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PREFACE 

Today personal computers can be seen wherever you go. They 
are in wide use as tools for both business and research. As a 
result, software is becoming more and more important. 
BASIC, a language used for personal computers, can be under- 
stood by everyone, because it uses words found in everyday 
conversation. 

BASIC is the first step in making various kinds of work more 
efficient. Consequently, more and more people in various 
fields are becoming interested and BASIC is gaining wider 
recognition. 

But at the same time, there seems to be an increasing number of 
people who shy away from BASIC because they think it is dif- 
ficult to learn. 

When it comes to BASIC programmhig, as in many other things, 
"practice makes perfect". However, many people who would 
like to learn it are having difficulty finding the time and place 
to do so. 

This manual and the PC-4 have been designed for use at almost 
any time or location. The manual is written in a clear, easy-to- 
follow format. We feel that you will enjoy learning from it 
while actually practicing various programming techniques with 
the PC-4 Personal Computer. Short programs are used to pro- 
vide ample opportunity for improving your skill. 
This manual places emphasis on gaining practical experience. 
That's why in the very first chapter the question "What can I 
use the FC-4 for?" is asked and answered. 

Even without knowing the grammar, you can input short 
programs and try to execute them. BASIC grammar is written 
in easily understandable terms that anyone, given some practice, 
can comprehend. Interesting examples have been included in the 
program library. These have been developed with tlie assistance 



of noted authorities in the computer field. 

By making your own modifications, you will be able to find out 

just what can be done using BASIC, all the while becoming 

more and more skillful. 

By using this manual, soon every member of the family will 

become a BASIC fan. 



Chapter 1 What Is the PC-4 Used for ? 

1.1 Learning BASIC by using the PC 4 * * * * ♦ 8 

1.2 What do we use the PC'--4 for ? .***** 1() 

1.3 I want to master BASIC ! .***** n 

1.4 I want to play a game ! ***** 15 

1.5 I want to use it for accounting or business 

applicatit)ns ! * # ,,. ,|. 4= jc) 

1.6 I want to use it for statistics or prediction 

calculatit)n ! **.*** 23 

1.7 I want to use the PC-4 for data management 

or arrangement ! ***** 26 

1.8 I want to use it as a notebook 1 ***** 31 

Chapter 2 What h a Program ? 

2.1 The Radio Shack PC ^4, a pocketable computer 

and calculator in a single unit * * * „ * 35 

2.2 There are no scientific function keys on the 

PC -4 but don t worry. * « # sit ji, /|q 

2.3 Obtaining the total of the numbers 1 through 

2.4 Simultaneous calculation of sum and square 

sum * sjt !i« 4< !i! 47 

Chapter 3 This Is a Program ! 

3.1 Programming at last ! ***** 52 



3.2 Program to obtain the total of the numbers 

1 through 10 ***** M 

3.3 A sHght change in the program 

3.4 Program to obtain the square sum simultane- 
ously 



SfS i|S »|; 3|« S|; '^Q 



* # # * ^ 



3.5 Program for obtaining the sum of 

(optional numbers ***** 64 

3.6 A slight change in the program ***** 67 

3.7 Conclusion 



Chapter 4 Now Let's Learn BASIC 

4.1 BASIC and the PC i 

4.2 Commands recjuired to perform addition, 
-subtraction, multiplication, and division 

4.3 Repeating any number of times 

4.4 Which one is the largest ? 



s|c # % S|S ?|E fjC) 



S|i * t' * * 7*> 

;|€ ^ }f! .is s|« y3 

?|E * * 4" sf? yc] 

* * * * ij! g4 



4..) Challengmg the trouble,some deviation values ***** 88 

4.6 Obtaining separate totals 

4.7 Another type of variable — array variables 

4.8 Jump!^GOTO 

4.9 Frecjuently-'made errors 

4.10 The game's leading players-^random numbers * * * * * 

4. 1 1 The ABC's of games ,, ,,, ,j, ,, ^ 1 j,, 

4.12 Dice game *.**** ^^^ 

4.13 Lme up ! ***** j^, 

4.14 Sorting of names as well 



:#. ^ !|« s|: s|c 94 

* !|s * # * <.)9 

* .* * * j|t 204 

* * .* * * 107 

109 



.* !fi j|« 1|! If; J 2 'i 



4.15 Character variables also have sizes. 

4.16 Find the data ! — 1. 

4.17 Find the data ! — 2. 

4.18 Roulette is also useful for mathematics 

4.19 Let's use the PC 4 to play the "paper- 
scissors- rock" game. 




♦ ^ sf: j|s s|« 



151 



Chapter 5 Program Library 

Cassette tape recording plan 

Vertical and horizontal total 

Scheduler 

Telephone list 

Train timetable 

Golf game 

Slot game 

Standard deviation and statistics 

Regression analysis 

Annual average growth rate 

Decimal 4™f base-n conversion 



Least .common multiple and greatest common 
measure 

Prime factorization 
Universal power calculation 
Simultaneous linear equations 
Function List 



:% ^ .^ 3|! 

sf; $ s|: s^ 

^ j|s s|e ^ 

:^ sfc 4« s^ 

:|s ^ :f5 sfi 

^ % 4^ #i 

;^ % 3|: jfii 

f|: 4^ ^ ♦ 

^ s|; ^ ^ 

J^ j|; 1^ ^ 

5|« % j^ ^ 



# .% :|: s|c 

;|« |« % !|^ 

#; 4^ $ sfs 

4^ $ #; % 



158 
1«() 
163 
166 
169 
172 
174 
176 
179 
182 
184 

186 
188 
190 
192 
195 



Chapter 



What Is the PC'4 Used for ? 




1. 1 Learning BASK by using the PC-4 



The computer has now advanced to a level where it is 
used not only by experts but also by grammar school 
students. 

As a result of the progress made in semi-conductor tech- 
nology, the computer has entered an age when it can be 
made smaller and smaller. 

At first glance, the PC-4 looks like a calculator with a 
lot more keys. 

Personal computers, which can be placed on a table, are 
talked about as being the standard of the microcom- 
puter age. 

On the other hand, the PC-4 is a "pocketable com- 
puter". This does not mean however that the PC-4 is 
just an oversized calculator. On the contrary, it is a 
genuine computer in every respect. This is because the 
PC-4 uses a high-level programming language known as 
BASIC and that can be used to perform a wide range of 
tasks. 

BASIC is a language which is used in the small business 
field or in technological applications. It is not a difficult 
language to learn. Even grammar school students can use 
it after some training. 

A high-level language means that we can program using 
words which are similar to those used in daily conversa- 
tion, rather than very special computer codes. Of 
course, you cannot become a programming expert with 
only two or three days of study. However, if you try the 
program examples in this manual, one by one, you will 
naturally gain a better understanding of BASIC. 
As will be stated over and over in this manual, when it 
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comes to programming, doing is more important than 
reading. So follow the examples and press the keys. An 
"ERR" (ERROR) display may appear often, but, if you 
try to figure out the cause, you will slowly gain an 
understanding of the various operations. 
This manual has been written so that you can refer to 
specific pages for guidance whenever you have dif- 
ficulty. So let's relax and learn BASIC. 
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1.2 What do we use the PC-4 for ? 



"PC-4 Application Map" 




L3 I want to master BASIC! 



The PC-4 is a splendid device for beginning the study of 
BASIC. One reason for this is that the BASIC which is 
used in the PC-4 is very close to standard BASIC (the 
internal circuitry is standard). 

The following program is a short but typical example of 
BASIC. Almost all personal computers can run it. 
This program includes a fundamental loop and a sub- 
stitution statement. Using the BASIC learned with the 
PC-4 you can take on larger computers when you have to. 
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For those who would like to master BASIC, input the program 
shown below using the operating procedure. This is a program to 
obtain the total of numbers from 1 through N For example, if 
10 is input for N, the result will be 55. 



Program to obtain the total 
of numbers from 1 through N 

Pfl 



iM 


IHPUT 'N= "' 


29 


S=8 


38 


FOR 1=1 TO H 


48 


S=S+I 


53 


NEXT I 


69 


PRINT S 


78 


GOTO 18 



[Explanation] 

This Program contains fundamental 
BASIC commands. If you can 
understand this program, it means 
that you have mastered the funda- 
mentals of BASIC. The meanings of 
the commands and symbols which 
are used here are explained in 
Chapters 2 through 4. After trying 
this program out by inputting vari- 
ous numbers for N, refer to Chapter 
2 for a more through explanation. 



[Program input procedure] 

Power ON 



L E A R A EXE 



The display will read as follows. 

r Means tliat a program can be writterh (Omitted hereafter) 



WRT DEG 

P01 23456789 



L 



<2> 



1 



SPG 



I M J 
(W] ' I [Pi 



Display at this time 



[w] LNJ [^ 
Nl fEXEl 



10 



INPUT 



N = 



1.3 I want to master BASIC! 



is the Shift Key. Do not confuse it with the 
regular letter (S] . 



<3> 2 S 



EXE 



Confirm the display. Does it read as follows? 



20 



S=0 



<4 > 

<5> 
<6 > 
<7> 
<8 > 



3 



'OF^ 



N EXE 



4 S 



5J [0 
6l [0 



7 



IM] 



G 



'RINT 



L 



G T 

H 



ill© 


+] Tl EXE 


ll EXE 


S EXE 


1 EXE 



D 



This completes the input. You should have confirmed 
the display for operations < 4 > through < 8 > as well. 
If a mistake is made during the above operation, press 
rr^^l and I '^'^ I to move the blinking dash (cursor) to 
the position you want to correct and reinput the correct 
information. 



[Program execution procedure] 

(1) After the [EXEI Key is pressed for operation 
<8> above, press ; ((^j and the display will be as 
follows. 



1 23456789 



(2) MODE 



13 



Chapter 1 What Is the PC-4 Used for? 



(■^) [0j The display will be as fallows. 

N= ? 

(4) Input a number lor N. 
For example, if N=-"10, input the following. 



m fol (EXE 



(5) Then the result will be displayed. 
5 5 



If the |EXE] Key is pressed again, the program will repeat 
from the beginning. 



N= ? 



1.4 I want to play a game ! 



There are probably a lot of people who would like to 
use the PC-4 to play games. There is no reason why you 
can't enjoy yourself and learn BASIC at the same time. 
With the PC-4, there is no capability to have large ob- 
jects jumping around on the screen because the display 
is rather small. Nevertheless, there are numerous mental 
games which can be enjoyed using the PC-4. Several of 
these are contained in this manual. 
If programs are recorded on a cassette tape using your 
tape recorder, you can enjoy various games at any time 
by calling out the programs from the tape. Well, let's 
play. 



HI-LO Game 

[Explanation] 

At the beginning of the game, the 
PC-4 hides a number. The object of 
the game is for you to guess what 
the number might be. When you 
venture some number using the 
numerical keys, the PC-4 will display 
whether the number you guessed is 
higher than ("HI:K=") or lower 
than ("LO:K=") the hidden num- 
ber. By repeating this cycle, you 
can get closer and closer to the 
hidden number. How good is your 
sixth sense? 
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For those people, who say "I want to play a game.", input this 

program into the PC-4 by using the following procedure. This 

game is called the "number guessing game" or the "HI-LOW 

game". 

See how many turns it takes to guess the number. This game 

can be enjoyed by two or more people. 



HI-LO Game program 

P0 

le PRINT "HI-LO" 
28 K=m: INPUT "KEY 
IN LEH6TH M 
30 R=INT (RflNI*19t 



30 PRINT "GOOD:flHS 
=";R:PRINT 7=" 
;K:60T0 20 



40 INPUT "KEY IH N 
0.%h:K=K+1:H$= 
"HI" 
50 IF H=R THEN 80 
50 IF H<R;H$="LO" 
73 PRINT H$;":K="; 
K:SOTO 40 

[Program input procedure] 

Power ON 



<i> IMODEI 11 I Id |L| (El |A| IRl |A| lEXE 
Display at this time 



WFU DEG ■Omitted hereaftar 

P01 23456789 



< 2 > 



1 



CLJ 



[w] 



H 



L 



(wl EXE 



Display at this time 



10 


PR IN J 


"HI i 



1.4 I want to play a game! 



< 3 > 



2 


K = (11 
[w] K E Y SPC 


1 N 

[w] 






SPC 


L 


E N G T H SPC 


(f-'l 



L EXE 



Display at this time 



20 K 



: INPUT 



Prior to pressing the (eM) Key for the last time, 
corrections can be made by moving the cursor to the 
desired position using the direction keys 
and inputting the correct information. 
<4> 



(EU EE ) 



<6> 



<7> 



<8> 



3 


R = 


INT' 


fT) 


RAN 


ft) * 1 





m L 


: [Yi EXE 



<5> 4 



[ m:;i 



[Wj 



K E 



S (sp^ 



N SPC N 



(w) 



I Pi 



A 



CD 



K 


= 


K 


+ 


1 




(ri H 




[w] 


H 


1 




fvv) 


EXE 


5 







LJJ 


A 


= 


R 



[Rj 



f K" 


7) 



8 




PI 


EXE 
A 




f^d 




6 


R 


H 




Lr) 


=r 




Lwl 


L 






LOJ 
[w] 



EXE 



7 



fw] 



[I 1 



TJ 



<9> 8 



( r: 


J 

1 
1 


4 


fwj 


(wl 


(Rj 


[ol 


LkJ 


] LkJ 




EXE 




1 n 






G 


D 


1 L 



[ n 



3(N][sJ@ 



(w] 
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SJ [o] [R 

W 



K 



m 
[w] ! 



{Q} 



K 



m 



rm \2\ EXE 



This completes the input. 

[Program execution procedure] 

(1) After pressing the [exe] Key for <9> above, 
press ,^. and the display will be as follows. 



p 


_ 1 2 


3 


4 


5 6 


7 8 9 






m 




The 




(2) 


IMODEI 


display wil 




RUN PEG 

R E A 


D 


Y 


P 






(3) Press {&]. Does the display show HI-LO? If 
so, press the gxi Key and KEY IN LENGTH? will be 
displayed. 

This is asking you "How many digits do you want in the 
number to be guessed?". You can designate a number 
such as 1 through 10; if you press [2] (exe) , the 
hidden number will be through 99, and if you press 

[3] (EXE) , the number will be through 999. Here, 
press [2] (EXE) , then KEY IN NO? is displayed and 
the game begins. If a number from through 99 is 
input followed by (exe), the display will read L0:K=1 
or H!:K=1. LO means too low and Hi means too high. 
K is the number of guesses. 

Since KEY IN NO.? is displayed again by pressing 
(exe) , input an appropriate number. By repeating this, 
you can get closer and closer to the hidden number. 
When you succeed, GOOD:ANS=00 (hidden number) is 
displayed, and K=00 (number of trials) is given by 
pressing [EXEl . 



7.5 / want to use it for a€€Ounting 
or business appVuations I 



You probably realize that computers are used in today's 
society for performing a variety of functions. The out- 
standing feature of a computer is its ability to handle 
and process many calculations. An endless number of 
business applications, such as sales accounting, stock 
control, calculation of loan payments, making estimates 
and cost accounting, can be performed more efficiently 
with the aid of a computer. 

The PC-4 can perform all of these functions with few 
limitations. 

We will use the calculation of loan payments as an 
example. With it, you can determine the proper periodic 
payment and surprise the salesman. 

Calculation of monthly loan payment 

Suppose you are buying a new automobile and the sales 
price is $1 0,000 with an annual interest rate of 1 1 % and 
24 monthly payments. In this case, what is the monthly 
payment when the down payment was $1,000, $2,000, 
etc.? 

The calculation is performed using the following for- 
mula. 



— P: Monthly payment 

;PT-R)X " PT: Price 

-, 1 R: Down payment 

n: Number of payments 
i: Interest {annual rate) 



( 1 + ,^)" 

For P, the payment is rounded up to the nearest dollar. 
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There are probably a lot of people who will say, "I want to use 
the PC-4 for accounting or business applications." Monthly loan 
payment calculations such as this, where a certain formula is 
used, can be done using a scientific calculator. However, using 
BASIC, anyone can obtain the result quickly and easily. 



Program for monthly loan payment 

n 

i% INPUT "PRICE". ft 
29 IHPUT "AHMUftL I 

HTERE3T(?;)M 
3e 1=1/1298 
48 IHPUT "NUHBER 

F PftVHEHTS''.H 
56 INPUT "DOMN PftY 

«ENT".R 
59 x=(ft-i?)*i 

78 T=i-l/(ii-I)tH 
S0 K=IHT(X/Y+.9?) 
?0 PRIHT "HOHTHLY 

FHYtfENT=";K 
m 60T0 58 

[Program input proceduure] 

< 1 > ' '^^ 



[Explanation] 

The calculation can be made with 
such a short program. The X on line 
60 is the numerator and the Y on 
line 70 is the denominator. X/Y is 
calculated on line 80 and the result 
is rounded up to the nearest dollar. 
The PC-4 will request the price, 
annual interest, number of pay- 
ments and down payment. All you 
have to do is input the numbers. 



[MODE] [T] [C] [0 E [A] [R] [A] (EXi 1) cS 
Display will show * * *\'AI^ ' "' 
<2> 



"01 [EXE 



•m 







m:i [w] [p] [r] CD [c] 



Q 



[Wl 



LP) 



"AlJEXE 



<3> 2 



1m ] 



1SE][R][I][S][T] 



rw] 



AlSSPaBiPclCD 

' ' MODEl ID [^g-^ 



[T 



<4> 



>MODEl Q [V) i ' [w] © fP] CD [EXE] 

[u [0] m Ej m m [2] 
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EXE 



<5> 4 



[' Mj 



SPC]rP][AirYl[M]rE][lN][Tl[S 



[w] INnUIIMIIBIlEllRHSPCllOlIF 



N] [EXi 



<6> 


5 


! ': t-f. 




E 


N T 


<7> 


6 


X = 



U ! [wi|D||0||W||N||SPC||P||A||Y||M 
vyj ' ' [p] [R] [EXE] 

iTl 



A 



R 



[3 



* 



EXE] 



ITJ 



X 



<8> SESBmBmiZ) 

E E) m I :rv] ^ inM [EXE) 
<9> [E [0] E @ CD E) [D m 
E E E E E E LYi 

[a- ] ' : fw] EEEEEEEispc) 

Lea E [EXE) 



EXE] 



<10> 9 



PAYMENT 



[w) 



<11> 1 



[Th"1 



¥) [^ [exe] 



This completes program input. 

[Program execution procedure] 

(1) After pressing [exeI at step < 11 > above, press 
[ mode] (F) 10) and the display will be as follows. 

PRICE ? 

(2) Input 10000 and press (exe I and the display will 
be as follows. 

ANNUAL INTEREST(%)? 

(3) Hereafter, input the numbers following the 
display. 

Input 11 and press ixE) and the display will be as 
follows. 



NUMBER OF PAYMENTS ? 
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(4) Input 24 and press (exe) and the display will be 
as follows. 

DOWN PAYMENT ? 

(5) Input 1000 and press [exeI and the result will be 
as follows. 

MONTHLY PAYMENT = 420- 

(6) If you press (exe| , the program will return to 
Step <4>. This time, input 2000 and press (exe| and 
the result, $373, will be displayed. This can be repeated 
using various amounts. 
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L6 I want to use it for statisti€S 
or prediction calculation ! 



The library section of this manual has examples of 
deviation value calculations and statistical calculations 
with two variables. These apply to the totaling and 
analysis of scores, to data analysis for quality control, 
and to prediction based on sampling. 
When you would like to know, for instance, the trend of 
a value which has a certain tendency, you can find it out 
using the moving average. For example, the stock prices 
on the stock market are changing daily. However, if you 
look at them at weekly or monthly intervals, you will 
see that they are going up or coming down. If you obtain 
the moving average, it is possible to predict the timing 
with which the stock market rises and falls. 
An example of prediction based on sampling is shown 
below. 




^5' \jf- 

Product sales and production planning 

For many products, there is a seasonal variation. So let's 
predict the proper production quantity for six months 
from now using the moving average value for past sales 
statistics. The past statistics are as follows. 



Month 


Apr. 


May 


June 


July '■ Aug. i Sep. ] Oct. 


Nov. ; Dec, j Jan. ; Feb. ; Mar. 


Sales quantity 
of product A 


549 


?48 


411 


857 


192 


235 


480 


331 


928 


459 


366 


' i 

5 2 'J 


Moving 
average 










451,4 


388,6 


435 


419 


433,2 


486,6 

_ 1 


512,8 


522,6 
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For those who wonder, "What can be done using statistical or 
prediction calculations?", try the following example. A 5- 
month moving average was obtained from the past year's data. 
Using an 8-month moving average, let's make a chart to predict 
6 months into the future. 

Program to obtain the moving average 

?% le vftc 

28 INPUT ^'NUrfBER 

F ffOVES=^.H 
38 6=6+1 
48 PRINT ''DftTr;B+ 

H*C 
58 IHPUT F(B) 
68 

HEN 38 
78 u=M 

36 FOR t-i TO H 
98 D=[)if(E) 
189 HEKT E 
lie PRINT ''flVERft6E= 

128 IF B=ft?B=M:C=C+ 



[Program input procedure] 



=8? IF Kft ^ 



^'^ (Mode][I][c][l][e][a 



R A EXE 



i--v-][2JLl 



EXE 



Display at this time. 



* * * V A R : 47 



(Data 



138 fiOTO 38 
<3> 



<2> [TJ [0j [y] [a] [c] ixE) 



2 



r;Mj [w] [NJLyJlMJLBJLEJLRj 



[SPCJlOllFllSPCllMllOllV 
[F^j [Aj [EXE 



E S 



iw] 



<4> 
<5> 

<6> 
<7> 

<8> 



3 B 



B + 1 EXE 



4 





C Ll ] 


(w] D 


A 


m 


fWl 


■ rc3] B 


+ A * 


C 


5 





LMl] 


F ' :rf] 


B 


6 





' IJJ (1 


=] l0 


to] 


Ell 


m 


B ' f/J 


A ' I P 


<n 


7 





D = 


EXE 





T A 



loj 


EXE 


[y] 


EXE 





EXE 
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<9> 

<10> 

<11> 

<12> 
<13> 
<14> 



8 


' [Hi E = 1 ' ' (O] A 


EXE 




9 


D == D + F 1 (T] 


E 


m EXE 


1 


, f-TTi E EXEl 


1 1 


, p^L-j ''"^ (W) A V E 


R A 


G E - ' (wi [Q] 


D / 


A EXE 


1 2 


. m B = A SJ 


fon B 


- (G C - C 


+ 1 


EXE 


1 3 


S rR"i 3 EXE 



This completes program input. 

[Program execution procedure] 

(1) After pressing [ EXE] at step < 14> above, press 
(MQQS [0] 111] (ii and the display will be as follows. 

NUMBER OF MOVES=? 

(2) Since we are using a 5-month moving average, 
press [5] (EXE) and the display will be as follows. 

DATA 1 ? 

(3) Input the sales quantity for the month of April 
which is given in the example. [5] @] (§] (EXE) 

(4) If you repeat this input up to August, the display 
will be as follows. 

AVERAGE=451.4 

(5) After checking the result, press (exe) and the 
computer will ask what the next data is. 

(6) Hereafter, if you input data, the average for the 
preceding 5-month period will be displayed. If these 
average values are linked, the entire trend pattern can be 
plotted and observed. By extending the trend line 
formed by linking the average values, the target product 
quantity can be predicted. 



1.7 I want to use the PC-4 for data 
management or arrangement I 



Suppose we have 7 products from A through G and the 
prices are as follows. 



A = $30 
B=$180 
C = $170 



D = $250 
E = $90 



F = $80 
G = $130 



We can determine the weekly sales ranking for these 
products and arrange the figures in descending order. 
In other words, this is work where data is input and, at a 
certain point, a computation is performed to evaluate 
the data and to arrange it. This operation is very similar 
to Multiple Item Sales Ranking which is often per- 
formed in business. Now let's process the above 
example using BASIC. 



Sales ranking of different products 








Unit price 


A 
i 30 


B 
$180 


c 

$170 


D 
$ 250 


$'^90 


F 
$ 80 


' " " 1 

G I 

$130 

5 j 


Unit sales for the 1st 
week of Septcttiber 


18 


6 


4 


1 


9 


20 



It is more practical to accumulate the monthly sales for 
each product by lining the data up vertically. For 
beginners, however, we will use a simple example. 
With BASIC we will calculate the sales for each product 
from A through G and also rank them in descending 
order. 
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7. 7 I want to use the PC-4 for data management or arrangement! 



This is an example for those who say, "I want to use it for data 
management and arrangement." Managing and arranging can 
mai<e data "come alive"and be more meaningful. Do not simply 
rely on your feelings. BASIC gives you the power to compute 
and analyze. 



Sales ranking program 

pe 18 vftc 

28 ft=H+l 

38 INPUT ''ITEM''.E$ 

(ft) 
48 IF E?(ft)="r TH 

EM 79 
58 IHPIJT''UHIT mz 

r,Z(ft+!3) 
68 60T0 28 
78 B=8 

88 FOR C=l TO fl-2 

% IF Z(C)*Z(C+i3) 

iZ(C+i)*Z(C+i4) 

THEN 138 

188 D$=E$(C):EI(C)= 

EI(C+l):EI(C+t) 

118 D=Z(C):Z(C)=Z(C 
+i):Z(C+t)=f) 

128 D=Z(C+139):Z(IC 
+13)=Z(C+!4):Z( 
C+i4)=0:B=l 

138 HEXT C 

148 IF 8=1 THEH 78 

158 FOR i>l TO ft-1 

160 IF E$(C)="8''tEH 
D 

178 PRINT EKO.^fW! 
0UHT=^;Z(C+13) 

188 PRINT "f^ZCO* 
Z(W3) 

198 HFMT r 



[Explanation] 

Let's challenge a program which is a 
little longer. 

It is important that you press the 
i<eys correctly while inputting the 
program. Relax and take your time. 
If an error indication (ERR2 P0- 
Line Number) is displayed during 
program execution (RUN), perform 
the following correction routine 
operation. 



AC] (MODE) CD (11 osD line num- 



be displayed, 
to the desired 



berlEXEl 

The program wil 
Move the cursor 
location using the direction i<eys 
( I <F^ I and p^ ) and input the 
correct information, then press the 
[EXE] Key. 
Note 



Program correction 

(1 ) To delete one character, per- 
form the above operation then press 
the ilD (delete) Key. 

(2) To insert one character, 
make an open space by pressing 

&ii (QgEl . 

(3) To change information on a 
whole line, press line number 
Hi . Previous informa- 
tion on the line is erased and new 
information will be stored. 

To delete a whole line, press line 
number Iexe] 
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Chapter 1 What Is the PC-4 Used for? 

[Program input procedure] 

• The key symbol (I j) will be omitted except where 
required for special operations. 

< 1 > 



I MQDE ] 1 CLEARA(EXE) (1] 



:iv::i 25 



EXE 



<5> 



<6> 



<7> 
<8> 
<9> 
<10> 



<11> 



The display will be as follows. 
* * *VAR : 51 
<2> 10 VAC [EXE 
<3> 
<4> 



EXE) 



20 A=A + 1 , 

30 ( jyij' [w] ITEM 
E' 'Cb)i LTlA lYi lEXE 
40 ' ijo E ' ' LB) ' t: 

[w] ! ' [w] ' ' Pk 1 70 (EXE 
50 [ jM ] ' (wjUNIT PRICE= (11 [w] 

[F^ Z [T] A i , [Yj [pj [S] [W] A M 



tw) 



r] A 



O 



m = 



OUNT = , 
ID [Y] (EXE] 



iw] 



fp] Z [T] A + 13 



H 



60 

70 B=0 (EXE 

80 

90 

[Ti C + 1 3 

il] [Y] * z 



20 (EXE 



[s] C = 1 rgj A -2 (EXE 

d] z ■ (ti c i ry] * z 






Yi i cn z 

rr] C + 14 



[T] C + 1 

11 r 



130 (EXE 



) 
Cy] 



K 



[g] 

E 



IBI 



100 D '"; 
(Yj ' i If 

I [RJ ' ' [f-] C + 1 
fT 1 C + 1 ( Y ) ' 

(T) C 



[RJ 

in 

(Yl 

D 



C 



rj C 

[T)E 



R 



(EXE 



<12> 110 D=Z 



[T] C 



[V] — Z 
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fYj • 11] 

m C + 1 



= E 

[RJ 

ryj ' 



1.7 I want to use the PC-4 for data management or arrangement! 



<13> 



CD Z 
120D=Z 
(iiC + 13 



ti C + 1 ' 
DJ C + 1 3 
fYl =Z 



D EXE 



fYl 

LyJ fI]Z 
(TiC + 14 



rnZ; '[TiC + 14 

ij B = 1 



fY] 



EXE 



<14> 
<15> 
<16> 
<17> 

<18> 



<19> 



(Y) 

D 

130 i Lo-'] C [EXEJ 

140 : , cjj B = 1 [7k'i 70 [EXE] 

150 (<ii C = 1 ' ■ [p1 A-1 [EXE] 

160 [:j-]E (Ti] CT]C. (Yj = 

(11 (W) , ' [w] ' ^ (oD ENDiXE] 

1 70 , f Xri E ■ rg] J ' m C j ' cy] 

(P] [w]AMOUNT='i[w] ito] 

Z [T] G + 1 3 , [Yj [EXE] 

180 .CIT] [w]' '[R] ')[W]i|][o]Z 

mc [Y] * z ' [T] c + 13 II 



EXE 



<20> 190 



G 



C EXE 



[Program execution procedure] 

(1 ) After pressing (EXE) at step < 20 > above, press 
(MO DEI [&] p] |„) and the display will be as follows. 

ITEM ? 

(2) Product A in the example is input by pressing 
[aJ [EXE] . The display will be as follows. 

UNIT PRICE= ? 

(3) Press (3j (l) [EXE]. The display will be as follows. 

AMOUNT= ? 

(4) Press [T] HJ EXE . The display will be as follows. 
ITEM ? 

Input data by repeating steps (2) through (4). 



Chapter 1 What Is the PC-4 Used for? 

(5) After inputting 5 as the amount for product G, if 
keys (0] EXE) are pressed in response to ITEM?, the 
data will be sorted internally and the item with the 
highest sales value will be displayed, in this case, F. 
If EEl) is pressed again, the display will be as follows. 

AMOUNT=20 
If ix@ is pressed again, the display will be as follows 
$1 ,600 

Hereafter, if you keep pressing gxE) , the display will 
show the other data in descending order. 
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1.8 / want to use it as a notebook! 



Refer to the part of the library section entitled 

"Scheduler". The PC-4 can be used as a notebook by 

storing a schedule, calling it out, and adding or deleting 

as needed. 

A maximum of 22 items' can be stored, if a RAM 

Expansion Pack (optional equipment) is added, this can 

be increased to 150 items. 

The 26 Keys from A through Z become the drawers of 

the memory and you can store the desired contents in 

them. When more than 26 drawers are required, press 



The display will be as follows. 

DEFM _ 

If you want to make 25 more drawers, press the 
following Keys. 
[2][5](EXi 
The display will be as follows. 

* * *VAR : 51 

This means you now have 51 drawers in which to store 

items. 

The C3:3 Key plays an active role when using the 

PC-4 as a notebook. 

SCHEDULE 
ON MAY 10 




BASIC is splendid 

for handling characters 



10 MEETING 
30 FISHING 
00 LUNCH 
00 RECEPTION 
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Chapter 1 What Is the PC-4 Used for? 



For those who want to use the PC4 as a notebook, try the 
following program. This is a program for inputting items and 
prices one after another. Then later, the amount and pricing 
data for a certain item can be called out. This is also a con- 
venient program to register those in attendance at a certain 
event, such as charity concerts, charity bazaars, etc. 



Program for items and prices 

P8 
18 IHPUT "ITEWtCI 

26 FOR B=l TO 23 
36 IF CI=&$(B) THE 

N 66 
46 HEXT B 
56 PRIHT "NO NWE" 

:G0T0 18 
68 priht "p!?ice=''" 

78 INPUT Z(B) 
S8 60T0 18 



pt 



18 C=6 

28 FOR B=l TO 23 
38 C=C€(B) 
48 HEXT B 

58 PRIHT ''TOTftL=»; 
C 

4 

18 m 

28 FOR B=i TO 23 
38 IHPUT 'ITOf.Dt 

(B) 
48 IHPUT "PRICE", Z 

(B) 

59 HEXT B 



[Explanation! 

The PC-4 permits storage of 10 dif- 
ferent programs in program areas 
P0 through P9. This allows one 
program to be divided and stored in 
three different areas for individual 
purposes. For example, the data 
may be input into P9, called out 
using P0, and totalled using PI : 



[Program input procedure] 

The key symbol (| j) will be 
omitted except where required for 
special operations. 



Input to I 



<1 > 



MODE! 1 CLEARA 



EXE 



f vii 



23 EXE 



The display at this time will be as 
follows. 



* * *V A R : 4 9 
10 
20 



<2> 10 VAC [EXE 
<3> 



L s 3 B = 1 lU 
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1.8 I want to use it as a notebook! 



CO] 23 lEXEJ 

<4> 30 [M ] [vg ITEM ^ m [FJD 

[R] m B (y3 (exe 
<5> 40 [; M ] [w] PRICE By] [R] 

Z [T] B 



m 



EXE 



<6> 50 f yj -J B lEXE 



< 1 > 



10 



10 



M ] [w] ITEM 



(w] [Rj C (Hi [EXE 



<2> 20 [:qj B = 1 [l.,]23 (EXE 

<3> 30 [,,]C [Hj=D [H] CT]B 



m f.K ] 60 lEXE 



<4> 40 f O.J B [EXE 

<5> 50 r [ 1 



[wj NO NAME (w) 



( , J (n ] 1 lEXE 



<6> 60 [ 1] (w) PRICE= (^ 
[o] Z [Tj B 



Y 



EXE 



<7> 70 f M ] Z fT] B cy] 

<8> 80 



EXE 



H ] 10 EXE 



< i> [1)10 C=0 [EXE 

<2> 20 [,s] B = 1 ([)] 23 (EXE 

<3> 30 C=C+Z [Tj B 

<4> 40 ( o ) B (EXE 

<5> 50 , , 1 



m 



EXE 



(w) TOTAL = 



Cw) 



[o] C [EXE] 
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[Program execution procedure] 

(1) Press [MODEl [0] (^gj and the display will be as 
follows. 

ITEM ? 

(2) For example, input HOLMES and press [exe] 
and the display will be as follows. 

PRICE ? 

(3) For example, input 20 and press [EXE] and the 
display will be as follows. 

ITEM ? 

Input various names and prices one after another. A 
total of up to 23 names and prices can be input. 

(4) For example, if you want to know the data for 
HOLMES, press (oj O B O H] d (EXg and the 
price will be displayed. Also, the total can be ob- 
tained by pressing ^,j. 
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Chapter 



What Is a Program ? 




2,1 The Radio Shatk PC- 4, a pocketable 
computer and calculator in a single unit 




The words "program" or "programming" are usually 
associated with computers. But what exactly is a pro- 
gram? Simply, a program is a set of instructions telling 
a computer what to do. For those studying program- 
ming for the first time, we will discuss how to think in 
terms of the program language BASIC. This does not 
mean that we will be speaking about something which is 
very difficult to understand, so just relax and read on. 

First, let's take a look at the Radio Shack PC-4 and how 

it operates. 

The PC-4 is a real computer but may also be used as a 

calculator. 

First, turn the Power Switch on. 



RUN 



DEG 



READY P0 



The display on the PC-4 will appear as shown above. 
Press the following keys in sequence. 



13J 1±J L5 J EX EJ 

It will take a moment to locate the positions of the keys 
at first but, after using the PC-4 for a while, you will be 
able to find them quickly. 

The EXE: Key is located on the lower right side of the 
PC-4. EXl is short for EXECUTE and it acts like an 
equals sign ((=)) Key on an ordinary calculator. 
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2. ? The Radio Shack PC-4, a pocketable computer and calculator in a single unit 

You should get a result of 8 after you press this key. 
Those who are used to performing addition on a cal- 
culator may consider this procedure a little strange at 
first. That's because when using a standard calculator 
the operation is completed by pressing the following 
keys. 

If you try to perform the operation in the PC-4 by 
using this sequence, you will get a blinking "— " (This 

is called the "cursor".) instead of an answer. 
Theg Key on the PC-4 is only used during program- 
ming and has a different meaning. With the PC-4, the 

(EXE] (Execute) Key is used instead of the [=) Key for 
calculations. 





By the way, a standard calculator has an (M+] Key 
(Memory Plus Key) and an [MR] Key (Memory Recall 
Key) to store numbers in the memory and to call out 
the memory contents. If you take a look at the PC-4 
Keyboard, you will not find these Keys. You might 
think that the PC-4 has no memory. However the PC-4 
is a powerful computer, with superior memory func- 
tions, when compared to a calculator. 



LBICU iBtOf 

ory and p< 
memorv. 



37 



Chapter 2 What Is a Program? 



For example, press the following Keys. 

[Ajixi 

A number will appear on the display. 
That number is the contents stored in memory "A". 
The above key operation simply calls out the contents 
of memory "A". Now press the following keys. 



in a program, rne- 
iTiories A to Z are 



variables. 



1 ZJ iEXE) 

Is there any display? 

This operation calls out the contents of memory "Z". 
In this manner, you can see that there are 26 memories 
from A to Z in the PC-4. 

Numbers with a maximum of 12 digits can be stored in 
each memory and a maximum of 10 digits can be dis- 
played at one time. 

Memories A to Z are known as "variables" when they 
are used in programming. 




38 



2. 1 The Radio Shack PC-4, a pocketable computer and calculator in a single unit 

These memory contents can be used for performing 
addition, subtraction, multiplication and division when 
they contain known numbers. 
For example, press the following keys. 



A) !=i ilJ ;0J lEXEj and izi [=1 |2! lEXE 



These operations store 10 in memory "A" and 2 in 
memory "Z". Note the previously stored numbers 
have been replaced by 1 and 2. 
Now press the following keys. 

A -I- Z EXE 

The result should be 1 2. 
Next, press the following keys. 



lAJ U ! ZJ lEXE! 

What is the result now? It should be 8. 
Now let's perform multiplication and division. 
If you look at the PC-4, you will see that there is no 
X or :-^: Key. 

Since the symbol for multiplication looks like the 
letter "X", an asterisk (^*!) symbol is used instead. 
Also, a i/j (slash) symbol is used for division instead of 
the conventional "-f" symbol. 

Now let's try multiplication and division using the 
contents of memory "A" and memory "Z". 
As you may have guessed, the key operation is as fol- 
lows. 



[Aj m IZJ lEXEj 
i A ] \A { Z 1 [EXE] 

Were the results 20 and 5 respectively? 

Incidentally, if you make a mistake and touch the wrong 

key, you don't have to clear everything. Press the direc- 



tion keys 
number. 



( ( <J== j and 



and enter the correct 
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2,2 There are no sciefifiYic function keys 
on the PC-4 but don't worry. 



The PC-4 has 26 memories (from A to Z) and we have 
learned that we can use these when performing addition, 
subtraction, multiplication and division. 
Now we will learn how to perform other functions such 
as sine, cosine and tangent. 

Some people might say, "I can do those l<inds of calcu- 
lations quicl<ly using a scientific calculator." Scientific 
calculators have l<eys such as [sinj , [cps] and ! 
The PC-4 does not have these l<eys. 
Let's try these function calculations using the PC-4. 
For example, obtain sin 30°. 
Key operation is as follows. 



tan I 



'M0DE"4' 
S I N 3 



EXE 



The result is displayed as 0.5. 






I 



(^ffi] a ore keys to ex- 
preis the angular unit of a 
number following SIN in 
degrees, 

The display shows DEG, 
doesn't ii? 

Since the display will show 
DEG when the PC-4 power 
switch is turned on, this ope- • 
ration may be omitted at that] 
Jime, 
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2.2 There are no scientific function /teys on the pc-4 but don't worry 



You must pay attention to one point. With a function 
calculator, input is made as follows. 



13 10! iSIN 



But with the PC-4, the function is entered first. 

This is very important when programming so please 

remember this point. 

Now, let's use the knowledge gained so far and use the 

memory contents instead of the number 30. 

Memory "A" now contains the number 10, doesn't it? 

Press the following Keys. 



iSj LiJ [N J I A 1 1 EX,Ej 

The result should be 0.1 736481 777. 

As you know by now, the above is the method for 

obtaining sin 10°. 

From this you can see that the PC-4 not only performs 

all of the functions of a scientific calculator but also has 

abundant memory to facilitate those functions. 

These functions are just a small portion of the many 

capabilities of the PC-4. 

Read on and you will be convinced of this. 
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2,3 Obtaining the total of the numbers 
I through 10 




We have already explained that the ability to perform 
scientific function calculations with abundant memory 
functions is only one of the many capabilities of the 
PC-4. Well, what other capabilities does the PC-4 have? 
It is capable of computing functions using a variety of 
programs. 

If you do not know much about programming, you 
might think this function is of no use to you. 
But by using a system of simple"manual programming", 
you will slowly be led into the knowledge of program- 
ming computers. Now let's obtain the cumulative totals 
of the numbers 1 through 10. Actually, if you are good 
at mathematics, you can get the answer pretty quickly 
on your own without using a computer but bear with us 
for a moment. 
• The first method. The calculator approach. 



AC I 1 



+ 2 EXE 3 

+ 3 EXE 6 

+ 4 EXE 10 

+ 9 EXEj - 45 

+ 1 0irxEl 55 



The above key operation is one method of obtaining 
the incremental totals of the numbers 1 through 1 0. 
This operation is almost the same as that used for a 
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2.3 Obtaining the total of the numbers 1 through 



10 



Standard calculator. 



• The second method. A bit closer to actual program- 
ming. 

Remember that the PC-4 has memories from "A" to 

"Z". 

Using one of these memories, we can obtain the total in 

a different manner. 

Here we come a bit closer to thinking in terms of a 

program. 

Turn the power switch on. 

Since we will be using memory "A", clear it by pressing 

the following Keys. 



A 






EXEI 



This operation means "write to memory A" and the 
gXEl Key means "execute this operation." 




Now let's check to see if the above operation stored a 
in memory "A". 
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Chap ter2 Wha t Is a Program ? 



Press the following Keys. 

Is a displayed? 

Next, we will add the numbers 1 through 10 in sequence 

in memory "A". 

First, to add in the number 1 , press the following Keys. 



jal si. 



symbol i. 
t from tf 
m used i, 




I A j I = j [At I ±j tlJ lEXEl 

The equal symbol does not mean that the two sides of 

the equation are equal. It merely means "put the result 

of the operation on the right side of the R symbol into 

memory A". The f=i symbol used here has a meaning 

which is different from the g sign used in mathematics. 

Since it is easy to confuse the meaning of the \=\ symbol, 

please be careful. 

Now let's check the contents of memory "A" to see 

what it has become as a result of performing the above 

operation. 

Press the following Keys. 

(Ajixi 

Is the result 1? 

In the same manner, repeat the operation the required 

number of times. 

A = A + 2 EXE 
A = A + 3 EXE 



A = A + 
A EXEi 



1 EXE 



55 



It was a bit lengthy, but did you get the correct answer? 
You must be careful not to omit anything and not to 
add the same number twice. 
Now let's try a third method. 
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2.3 Obtaining the total of the numbers 1 through 10 



• The thrid method. Even closer to actual program- 
ming. 

Since the PC-4 has 26 memories (from "A" to "Z"), 
let's prepare another memory and see what numbers 
were just added. 

Since the numbers which were added to one another 
increase by 1 in sequence, we will store this in memory 

Clear memory "I" in the same manner as "A" was 
cleared in the previous example. 
Press the following keys. 



lAj 



10JIEXH 



LI J 1=1 ( J lEXEJ 

Then add 1 to the contents of memory "I". 

Q] [=1 Q] I +) il] ixEj 

Check to see if the operation was successful. 
Press the following keys. 



LiJ lEXEl 
Is the result 1 ? 

Next, add the contents of memory "I" to memory 

"A". 

Press the following keys. 



LAJ 1^ I AJ i±l LiJ lEXEj 




We're get- 
ting close 
and closer 
to think- 
ing in 
terms of a. 
program. 
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Chapter 2 What Is a Program? 

The entire operation is as follows. 

A = EXE 
I = EXE 

1 = 1 + 1 EXE' 

A = A + I EXE 

1 = 1+1 EXE' 

A = A + I EXE 

flKBCDEBSixi' 

A = A + I EXE 
A EXE 



Sturt 



Repeat 
until 1=10. 
This is 
called a 
"loop". 



memim: 



I = 



t-At- 



When the value of I 
is less than 10. 





ffl 

A 


— 


Tjt ij 












I 


I EXE 



[AlljXEl 



Clear 



I is increased 
by 1 and that 
amount is 
added to A. 



Comparison is 
made to 
determine 
if I is equal 
to 10 or 
lessthanlO. 
When the value of I 

becomes 10. 



The result 
is displayed. 



End 



Using this operation me- 
thod, if the [T] and [EXB 
Keys are pressed along 
the way, you can checl< 
to see what number is 
being added at that 
point. 

If you tal<e a lool< at 
the figure on the left, 
the Key operation which 
was listed above will be 
easier to understand. 
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2.4 Simultaneous cakulathn of sum 
and square sum 



In the previous examples, the total of the numbers from 
1 through 10 was written in memory "A". Now let's 
extend the operation further and also write the square 
sum from 1 to 10 in memory "B". In this manner, two 
jobs can be combined into a single sequence. 
This means that both of the following operations will 
be executed simultaneously. 

A ^ 1+2 + 3 + 10 

B ^12+22 +32 + 102 

• The fourth method. We are now beginning to really 

resemble programming. 
If this operation is performed using a calculator with 
an ordinary memory, A will be obtained first and B 
will be obtained last. 

However, if you use a method which resembles pro- 
gramming as shown below, A and B can be obtained 
simultaneously. 

Input 

[A J (i) [0] (EXi 

(Ij E] 10] ixEi 
[D B Q1 EB CD (EXi 

A = A + I EXE 

1 11 E) il E0 Q] ® [I] (EXE) I 



\ / see! 
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Chapter 2 What Is a Program? 



M= I +1 EXE 

A = A + I EXE 

B = B + I * I EXE 

A EXE 

B EXE 

To find out the current step you are on during the 
above operation, simply press 

[j] iXEl 

As with the third method, this operation will be easier 
to understand if you refer to the figure below. 
When computers were less functional and more expen- 
sive, procedures such as that shown below were time 
consuming and cumbersome. 



Start 



![b][=_JS][|xI] Cloa 



[i]E]l]l+Jd][E_xI] 




a! = SL+ jDCIxe] 




^d ^iJUllA I 


EXE 





iWhen K'10. 



[iJ[exe] 



' V I is increased by 1 each time. 
The I which has been increased 
is added to A and A becomes 
a new value. 

Also, ttiat I is squared and added 
to B, and B becorties a new value. 



: When 



A JEXE 

CbTexI] 



10 
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End 



2.4 Simultaneous calculation of sum and square sum 



Also, the keying operation requires much patience. 
The "programming" approach enables us to put the 
entire procedure into the' memory and simply plug in 
the desired numbers. 



• The fifth method. Extremely close to programming. 

Now, let's try just a little harder and expand the way of 
thinking even more. 

In the fourth method, the sum of the numbers 1 through 
1 was obtained as well as the sum of the squares. Now 
we would like to obtain the sum of optional 10 numbers 
as well as the square sum. 

At this time, there is a new requirement to store the 
value of the optional numbers in a memory. Let's use 
memory "X" for this purpose. Memories "A", "B" 
and "I" are used the same as before. Memory "I" is 
used to count the number of times the optional number 
values (called data) are input. 
If the input value (data) 
is labeled as Xi (i = 1, 2 
10), we get the fol- 
lowing. 

A ^ X, +X2+....+X,o 
B ^ X? +X^ +...,+ xJ„ 
As with the third and 
fourth methods, the en- 
tire procedure is as shown 
on the right. 

Try to operate the keys 
in accordance with the 
figure and input some 
actual data. 



Start 






I Makes il pos- 
sible for optional 
[data la be input. 

7^ "• 



;i 

i V 

[ ^ 


1 _ ] Niimt'iicrtl [r vr j 
L - 1 vjIui- l}r-l- ! 


[b 


_-i^yjLt-JLXjL*liX;iiXr] 



F^eturn if K10. 



[r 



I Coinplele if l>10. 



[AJ[C<E_ 



Fr» 
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Chapter 2 What Is a Program? 




L5 



By the way, this example is a very useful one. Suppose 

the data of Xi through Xio are test results. 

The average score can be obtained in the following 

manner. 



lAj i /j llJ lEXE] 

In Chapter 4, Section 5, entitled "Challenging the 
troublesome deviation values", will explain some useful 
applications for the square sum. 

Following is some sample data. Use it to obtain the 
average score. 

30, 50, 80, 40, 20, 70, 60, 90, 50, 80 
If the value of A becomes 570 and the value of B 
becomes 37300, the answer is correct and the average 
score will be 57. 

How did you make out? Did you make the inputs 
correctly? 
Was it difficult? 



The operations that have been performed until now 
have brought us to a point where our thinking ap- 
proximates actual programming. Nevertheless, it is still 
"manual programming", similar to using a calculator. 
At this point, you are probably tired of using so much 
key input so we will stop "manual programming". 
In the next chapter, we will perform programming using 
the same values which were used in this chapter. You 
will be surprised at how clear-cut the methods are. 
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Chapter 3 



This Is a Program ! 




3.1 Programming at last! 



Now let's get into some actual programming. The 

language used for programming the PC-4 is BASIC, 

one of the most popular computer programming 

languages. 

Even such a compact pocketable computer as the 

PC4 can still make splendid use of BASIC. In addition, 

the PC-4 can use unabbreviated words such as PRINT 

and INPUT, and has the same kind of performance as a 

full-sized personal computer. 

This is why the PC-4 is very useful for beginners who are 

just learning BASIC. 

The BASIC language itself will be explained later in 

detail in Chapter 4. In Chapter 3, we will learn how 

to make actual programs to obtain the same results 

noted in methods three through five in Chapter 2. 

Relax and enjoy Chapter 3. 



• Before starting, please note a few points. 

Since the terms and symbols will be slightly different 
from those previously used, you should note the correct 
usage. First of all, in the "manual programming mode" 
used in the preceding Chapter, the "A" through "Z" 
Keys were explained as if they were ordinary calculator 
memories. They were referred to as memory "A", 
memory "B", etc. 

In a program, however, they will be called "variables". 
For example, they are referenced as "variable A", 
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A variaibi'e is a syrr, 
bol, such as "A " , 
whose value may 
be any number sui 
as m] 20. etc. 



3.1 Programming at last! 

"variable B", etc. So even if referred to as "A" and "B", 
please think of them in terms of being variables with 
numerical values. 

Also, in executing an operation such as inputting 10 
into variable "A", we press the following keys. 

[A]@Cl] [0)1X1 

In this case, [|x| means to execute the contents written 
to the left of iXg . It is a fundamental requirement 
that this key be pressed at the end of each line. 
However, the changing of mode or program area can be 
done without pressing the EXB Key. Key expressions 
such as [g and g will simply be written as A and = 
when the meaning is clear. 




PItast ust ffte(MI,C 



and 



/f£Xs freely when inputting programs. 
If the \ts} Key is pressed, everything sfiown 
on thedhplay will be cleared. If the 
and\ 



]Keyi are pressed, the cursor 

(blinking dash) will move to the left or to the 
right. The ^p Key Is colled the "delete 
key" and deletes the character above the 
cursor. The »Ja) Key « co//«/ the "Insert 
key" and h used to rnoke a space at the 
position where the cursor is located so that 
one character can be inserted. You should 
try various operations to get used to using 
these keys. 
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3.2 Program to obtain the total of 
the numbers 1 through 10 



Let's actually program the operation to perform the 
computation which was done in method three on page 
46 using "manual programming". 
Turn the PC -4 Power Switch on. 




RUN mode Does your PC-4 show a display like the one above. The 

important thing here is that RUN is displayed. This 
means that the PC-4 is in the RUN mode. Actually, all 
of the previous examples were executed in the RUN 
mode. 

(While we are on the subject, DEC was the degree mode 
of the angular unit, wasn't it?) 

But, since we now want to write a program, we must 
change the mode. 
Press the following Keys. 

(MpDEl IT 




The display will be as shown above. The RUN mode 
has been cleared and WRT appears. This is an abbrevia- 
tion for the word "WRITE" and it indicates that the 
PC-4 is in a WRITE mode which permits a program 
to be written. 

Referring to the figure on Page 46, write in the key 
operation just as it is shown. Write in the first two lines. 
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A=( 



EXEl 



3.2 Program to obtain the total of the numbers 1 through 10 



= EXE 



The cursor (blinking bar) will appear on the left side 

of the display. 

Now let's check to see if the two lines which have been 

input are actually stored in the PC-4. 

To do this, press the following Keys. 



ILJ I LJ LSj I Ij i EXE) 

This command may be input using the individual 

alphabet Keys to spell out LIST or by pressing's' (the 

SHIFT Key) and ;^^i. 

After this, the display should return to the original 

condition. 

Is the blinking? 

Too bad! This means that nothing was written into the 

program. Read on and you will find out why. 

• Line numbers are required in a program 

When actually writing a program, each line of the 

program must have a name, a way to address each 

specific part. Normally, we think of a name as being 

something like "John" or "Mary". 

But in BASIC, we use numbers which are called "line 

numbers". 

Any numbers from 1 to 9999 may be used but it is 

customary to use 10, 20, 30, etc. to allow for additions 

or insertions to the program. 

Now let's make some inputs using line numbers. 

10 A=0 EXE 

20 I =0 EXE 
At this time, line 20 should remain on the display. 
Now let's check the input using the LIST function. 
Press the following keys. 

■■^ : ' EXE 

Did the display show the following? 

10 A=0 



I see! 




Chapter 3 This Is a Program! 



Next, if the ^E) Key is pressed, the following should 
be displayed. 
20 1=0 

If the (EXE) Key is pressed again, the display will be 
as follows. 




IF ~ THEN 



PRINT 



END 



The will be missing indicating that a program is enter- 
ed in this memory space. The blinking cursor will be 
in the position. However, the WRT symbol will 
remain. 

In other words, the PC-4 will remain in the WRT 

(WRITE) mode. 

Next, input the following. 

30 1 = 1+1 lEXEl 

40 A=A+ I lEXEj 
Please take another look at the figure on page 46. 
TheO symbol in the figure shows the location where 
a decision is made. 
Make inputs as follows. 



50 IF 



10 THEN 30 iEXE! 



This means, "If I is less than 10, then jump to line 30." 

This is a BASIC language command statement. 

Next, to see the result of A, make the following input. 

60 PRINT A ixg 

PRINT means to show the result on the display. 

As the final step in the program, be sure to input the 

following. 



70 END {EXEj 

This END means that the program is finished. Even if 
END is not input, the program will still work. However, 
END is the standard way to terminate a program. 
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3.2 Program to obtain the total of the numbers 1 through 10 



• Let's list the program 

Let's list the program to see if it was written in correctly. 

[EXE or :«; S] 'EXi . The following 



Press 



display should show line by line. 



10 

20 
30 
40 
50 
60 
70 



A=( 



I =1 + 1 

A=A+I 

IF K10 THEN 30 

PRINT A 

END 

If the list shows on the display just as in the above 
example, the program is correct. Also, if a program is 
listed in the WRT mode, only one line is displayed at a 
time. You must press the [exb Key to display the next 
line. 
If a mistake has been made on a line, press the direction 

keys (j <: ; j orr;i!> J) to move the cursor to the left or 

right until it is beneath the character to be corrected, 
then input the correct character. 

At this point, program input is complete. Compare the 
amount of key operation required to perform the 
operation on page 46 with the amount required here. 
Just this small amount of work here accomplishes 
exactly the same results. 
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Chapters This Is a Program! 



• Let's execute the program we have just written. 

Program execution is performed in the RUN mode. 
Press the following keys. 



!M D Ei L0J 



IMQDE) [0] designates the RUN mode. 
After doing this, the display will be the same as it was 
when the power switch was turned on. The display 
will be as shown below. 




77?i? RUN mode 
and the RUN used 
to execute a pro^- 
gram are different 
so please be care- 
ful. 




This display means that program P0 can be executed. 
At this time, input one of the following to execute 
program P0. 



[r] (u] [n] 1x1 or [i)[|][EXl 

After about one second, the result of 55 will be display- 
ed and STOP will be displayed on the upper right of the 
display. This means that the program execution is 
complete. The troublesome operation which before 
required manual key inputs to be made 10 times is 
executed easily with this simple program. 
And yet, "repetition of the same key operation has been 
replaced by only one input". This is very different from 
an ordinary calculator, isn't it? 
This is the power of the PC-4. 
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3.3 A slight change in the program 



Let's take a closer look at the power of the PC-4. 

In the previous section, the total of the numbers 1 

through 10 was obtained. Now the total of the numbers 

from 1 through 100 will be obtained. 

This program will be a slightly modified version of the 

previous program. 

Put the PC-4 back in the WRT mode. 

To do this, input [MODE 1 , . 

The display will be as follows. 




The blinking cursor will appear where the should be 

located. This means that the P0 program area already 

has a program written in. Also, the blinking cursor 

means that it is possible to write data to program area 

P0. 

List the program to check it. 

At this point, we want to change the program from 1 

through 10 to 1 through 100. All we need to do is to 

change 10 to 100 in the decision portion shown by the 

<> symbol on page 46. 
Display line 50 by inputting the following. 

L I S T 5 (0]ixl or (i) 
Line 50 will be displayed. 
Then, using the direction key (f ^7 
Key, change the required portion. 
For practice, change the line to read as follows. 



IJST 



[5](0jiXE) 



j) and the 



50 IF K100 THEN 30 
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Chapters This Is a Program! 

Were you successful? 



After correction, return to the RUN mode in the same 

manner as before and confirm that READY P0 is 

displayed. 

Then execute the program by inputting the following. 

[R] QJ) [N] [EX| or fe """ EXg 

After a few seconds, a result of 5050 will be displayed. 
This kind of simplified operation is the big difference 
between the PC-4 and ordinary calculators. 



Note 

Step number 

If the WRT mode is designated by pressing fMODl RI , the display will 
appear as follows. (The display indicates a case where no programs are 
written in the program areas.) 




If all the programs have been cleared, the "544" shown on the upper right 

of the display indicates the remaining number of program steps. 

In this case, it means that 544 steps remain. 

Since nothing is written, it indicates that a maximum of 544 steps can be 

written into program areas P0 through P9. 

The step numbers are counted as follows. 

(1 ) Line numbers (1 to 9999) 2 steps 

(2) Command names and function names (FOR, TO, SIN, PRINT, etc.) 
1 step 

(3) Line spacing (required at the end of each line) 1 step 

(4) Other characters 1 step per character 

(5) All spaces (SPC) other than those in character strings enclosed by 
quotation marks (" ") are ignored. 

As a program is written, you will see the step numbers on the display 
decrease. 
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3.4 Program to obtain the square sum 
simultaneously 



Next, let's make a program to accomplish the operation 
performed in the fourth method on page 47. This is a 
calculation to obtain the total of the numbers 1 through 
10 and their square sum simultaneously. The program 
approach is the same as that used in the previous ex- 
ample. 
The program is shown below. 



jrn to I'lere i 
ess than 10 



10 A = 

20 B = 

30 I =0 

»40 1 = 1+1 

50 A = A+I 

60 B = B + I*I 

70 IF K10 THEN 40 

80 PRINT A 

90 PRINT B 

100 END 



Clears the ? 
sum variab' 



Square suit 
la t ion 



Square sum result 




The only difference between this program and the 

example in the previous section is that line numbers 

20, 60 and 90 have been added. 

Now, for practice, let's write the program into the 

PC-4. 

Place the PC-4 in the WRT mode in order to write 

in the program. The cursor in the position should 

blink as before. 
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Chapter 3 This Is a Program! 



If this (List 2) program is written in at this time, the 
previously written (List 1) program will be erased. 
By the way, the PC-4 has 10 locations (from P0 through 
P9) where programs can be written. This means that up 
to 10 programs can be stored simultaneously. 




Now we will write List 2 into the PI area. 
The procedure is as follows. 



PbDEl [Tl 



If the 1 blinks, it means a program can be written into 

program area PI . 

If the cursor blinks instead of the 1 , it means a program 

is already stored in PI. To erase that program, input 

[ Cj [Lj IE] [A] (RJ (EXg . 

This will clear the program currently stored in the PI 

program area and the 1 will blink. At this time, if you 

attempt to list the program nothing will be displayed. 




If the hblinks, it means 
that there is no pro- 
gram written in that 
program area. If the 
cursor blinks beneath 
the 7, It means that 
there is already a 
program written in 
that program area. 
To clear it, press 

mmmmm 

ExB . Then the 1 
will blink to show that 
nothing is written in 
that program area. 
Did you understand? 
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3.4 



Program to obtain the square sum simultaneously 



• Write-in and execution of List 2 

Write the program shown as List 2 on page 61 into the 

PC-4. 

After writing, check the LIST contents. If any errors 

are found, make corrections using the direction ([ <j- 



), delete ( (delj ) and insert ( 



liofu) Keys. 
Now return to the RUN mode by inputting pODElff!. 
The display should be as follows. 



READY PI 



If READY P0 is displayed, input g ,7| . 

The program will begin execution immediately. 

Also, to execute when the display shows READY PI, 

'"P"t IB] fUl INJ iEXE) . Then 55 will be displayed. 

This corresponds to program line number 80. 

If the iEi Key is pressed again, 385 will be displayed. 

This is the result of the execution of line number 90. 

If the ixl Key is pressed again, the program will go to 

the END at line number 100 and the STOP display will 

go off. 



In computer terms, 
program check irm 
and correction is 
krmwn as "program 
delxjgging". 




Note — 

If you operate the PG4 while reading this manual, the display may some- 
times go off. This is to save battery power. The PC-4 will shut off auto- 
matically after 7 minutes have passed without any input. To turn it back 
on, press 1;.°^,^ 
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3.5 Program for obtaining the sum of 
optional numbers 




tl\jPUT 



You have learned very important concepts by now and 
we hope that things are becoming more and more in- 
teresting. But don't get impatient. Take a moment now 
to relax. 



Well now that you have had a rest, let's make a program 

using the figure on page 49. 

This is a calculation for obtaining the sum and the 

square sum by inputting 10 numerical values into the 

variable X. 

By the way, this program has one difference when 

compared to the previous programs. 

The difference is that the numerical values must be 

entered whenever the display shows a question mark 

("?") 

An INPUT X command is used to input numerical values 

into the program. 

The program is as follows. 



10 A=0 

20 B=0 

30 1 =0 

40 1=1 + 1 

50 INPUT X 

60 A=A+X 

70 B=B+X*X 

80 IF K10 THEN 4( 

90 PRINT A 
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3.5 Program for obtaining the sum of optional numbers 



100 PRINT B 

110 END 

This program will become the P2 program. As you 
probably know by now, input |m 00110] then [Blffi The 
display will be as follows. 




The 2 will blink. 

If the cursor blinks in the 2 position, it means a program 

is already stored so erase it by using CLEAR [EXg. 

After inputting the program, check for errors by listing 

it and return to the RUN mode by pressing [MODS® • 

The display should show READY P2. Then input RUN 

LIEl and the program can be executed. 

This procedure has already been performed many times 

before so you have probably become skilled by now. 

If READY P0 or READY PI appears, call out P2 by 

pressing [||('|] . 

Program execution will begin immediately. 




/ i/jifik you're he- 
ginning to under- 
stand, so let's wrap up 
the operation for pre- 
paring to write in and 
execute the program. 
To write In press 

[MODEj (T) , then 
call out the wea in 
which you want to 
write the prognm, 
for example, by 

pressing g| fitt . 

To enerute, press 
fMOB^ ® , then 
ioll out thi\ rri-)!}r,rm 
to he ex I- cute ., . 
example, by pressing 

@ Si , 
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Chapters This Is a Program! 

When the program executes line number 40, a "?" 
will be displayed. This means "input the data for 
variable X". For example, if 30 is input, the display 
will be as follows. 

30 
If the iXE] Key is pressed, the "?" will be displayed 
again. Continue to make inputs in the following se- 
quence. 

50, 80, 40, 20, 70, 60, 90, 50, 80 

After completing input of the 10 data elements, the 
sum A, a result of 570, will be displayed. 
Next, if the §XE) Key is now pressed, the'square sum B, 
a result of 37,300, will be displayed. 



Note 

There are two ways to stop program execution. One method uses the 
lIOQKey and the other method used the iAC] Key. If the STOP Key is 



used, STOP will appear on the upper right of the display. If the STOP Key 
is used again, the program area and line number where the program execu- 
tion was stopped will be displayed. For example, P0 - 70. Then if the 
i^lJ Key is pressed, program execution will restart from the stopped 
location. 

On the other hand, if the :AC Key is used, program execution will stop. 

When you desire to stop the program execution completely use this 

method. 

*There may be times when the gTOFj Key and [AC IKey do not produce 

the desired results. In that case, use the power switch to stop the 

program. 
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3,6 A slight change in the progam 



By making modifications in a program, many different 
programs can be created. 

For example, the List 3 program in the previous section 
had 10 different data elements. It can be changed as 
follows. 

• When the number of data is known but yet it may 
vary. 

Change the program so that the number of data ele- 
ments can be input into variable N and also change the 
decision portion on line 80 from 10 to N. The program 
is as follows. 



L 



10 


A=0 




20 


B=0 


The approach is 


30 


1 =0 


changed from 10 


40 


PRINT"N="; 


errtries to N entries 
for tfm variable. 


50 


INPUT N lr;(Mjtni,mbt 


{ I see! ) 

\ J 


'60 


INPUT X 


70 


A=A+X 


80 

90 

100 


B=B+X *X 

1 — 1 4- 1 I, , . , 


^^ 


1 — 1 1 1 liiiHJt data CO 

IF KN THEN 60 


^^ 


110 


PRINT A 


"yOj^P 


120 


PRINT B 




130 


END 
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Chapter 3 This Is a Program! 



If we compare List 3 and List 4, we see that the position 
where the input data is counted is different. 
This position can be anywhere between line number 60 
and line number 90. Line 40 and line 50 can be written 
on the same line using INPUT statement; 

40 INPUT "N=", N 

• When the number of data elements is not known. 

It is sometimes troublesome to count the number of 
input data ahead of time. Then it becomes difficult to 
determine how to get the result. 

For example, if it is i<nown that the value of the data 
will not be a negative (minus) value, there is a method 
for inputting a negative value on purpose to terminate 
the process. This method is often performed. The 
program is as follows. 



Vv'rite this program 
and execute it. 




Returr 



mp 



10 


A=0 


20 


B=0 


30 


1=0 


40 


INPUT X 


50 


IF X<0 THEN 100 


60 


1=1 + 1 


70 


A=A+X 


80 


B=B+X *X 


90 


GOTO 40 



PRINT A and PFMNT B car 

100 PRINT A,B tK written on the same line 

by separating A and 8 witi" 

110 END ^^'"'■ 



The GOTO on line number 90 means "transfer execu- 
tion to line number 40". 
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3.7 Coffc/iisfOff 



Chapters 2 and 3 have explained how to perform 
calculations on the PC-4 by using a calculator approach 
and then by programming. 

The reasons for explaining in this way were to show the 
differences between the PC-4 computer and ordinary 
calculators and also to get you thinking in terms of 
making programs. 

The big difference between a computer and a calculator 
is that a computer can store the working procedure, the 
program. 

By storing this program in the computer, the same 
repetitious tasks can be performed over and over with 
amazing speed. 

On the other hand, with a calculator, the numeric inputs 
and functions must be entered again and again. 
Take another look at Chapter 2 and you will realize 
how difficult this can be. 

Of course, if a problem does not require much repeti- 
tion, then the time it takes to develop a program may be 
excessive, and the work could best be done directly on a 
calculator. 

The calculator is best suited for simple problems. 
So the question as to which is better, the calculator or 

the computer becomes relevant in light of the individual 
job. 

In any case, the PC-4 provides the convenience of a 
powerful computer with calculator capabilities. 
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Chapter 3 This Is a Program! 




tt won't work unless [he content \ 
to be executed are fi tared. 
Excellent for repetitious warti, 
tt can make /ttdgementi without 
human assistance, 
tt IS neceiSary to give /f more pre- 
cise H/or/t than a 
calculator, 




• BASIC is unexpectedly simple. 

We think that you probably understand now how to use 

the programs which were practiced in Lists 1 through 

5 of this chapter. 

Also, you probably feel more comfortable with BASIC. 

Certainly, the program commands which appeared in 

this chapter (IF ~ THEN, INPUT, PRINT, GOTO, etc.) 

and the commands used outside the program (LIST, 

CLEAR, RUN, etc.) are readily understood since they 

have generally the same meaning as they do in common 

usage. 

With the exception of the = symbol, which means to 

substitute the right side result for the left, each symbol 

used in BASIC ( +, <, ~ ) is similar to mathematical 

terms. 

Therefore, you were probably able to cope with these 

terms and symbols without any particular difficulty. 

By this time, if your understanding of computers and of 

BASIC programming has increased even slightly, you 

will be able to easily master the following Chapter. 
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Chapter 4 



Now Let's Learn BASK 




4. 1 BASK and the PC'4 




BASIC programming language was developed in the 
United States. BASIC is an abbreviation for "Beginners 
All-Purpose Symbolic Instruction Code". Keep in mind 
that BASIC is a computer language for beginners. 
Even though BASIC has been used for a number of 
years, many people are now using it for the first time. 
As a result of the recent boom in personal computers, 
the use of BASIC is rapidly spreading throughout the 
world. 

And yet, technological progress never stops. 
BASIC language has now even arrived to the pocket- 
sized computer level. 

Although the PC-4 does not have a graphic function, it 
is comparable to the full-sized personal computers of 
just a few years ago. 

In spite of its small memory, the PC-4 uses full-fledged 
BASIC and not an abbreviated form. For example, when 
a program is listed, the display willshown PRINT or 
INPUT without abbreviation. 

Therefore, the BASIC programs which you learn using 
the PC4 can be used with other personal computers 
with little or no change. 

That is why it may be said that the PC-4 is an excellent 
computer for beginners to learn BASIC. 
Now let's take a look at some practical uses of BASIC. 
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4.2 Commands required to perform addition, 
subtraction, multiplication and divisiop 



In the previous chapter, a program for obtaining data see the List ex^^ 
sum and square sum simultaneously was introduced. mples on pages 

In a similar manner, we will now see a method for 64, 67 and 68. 
obtaining the sum, difference, product and quotient of 
two values. 



• Remember the equal symbol (=) is different from the 
mathematical equal sign. 

By the way, in PC-4 BASIC, 26 character variables from 
A to Z can be used. However, since each variable 
may only be one character long, variables such as A1, 
AB, etc. cannot be used. 

The program for writing the sum, difference, product 
and quotient of X and Y into A, B, C and D is as follows. 




100 
110 
120 
130 



A = X + Y 
B = X-Y 
C = X*Y 
D = X/Y 



C'omrriamJs which 
.are used in a pro- 
gram are cailed 
"program com- 
mrmds". Com- 
mand SLicti as FUJlM 
or LIST wiiich are 
not used in a pro- 
gram are called 
"processing corn - 
rnands". 



It should be noted here that the items to the left of the 
= symbol must be variables. In the above example, 
A, B, C and D are the variables. 

Also, the items on the right side of the = symbol are 
called the "mathematical formulas" or simply "for- 
mulas". Of course, numerical values can also be placed 
on the right side. 
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Understanding the 
use of the = syrri'^ 
bol is die Ijegin^ 
ning of under- 
standing program- 
ming. I3e careful 
since it is easy to 
ndsunderstand. 




The = symbol means "substitute the value obtained us- 
ing the formula on the right side for the variable on the 
leftside". 

Therefore, it has a meaning which is different from that 
used in mathematics. Be careful. 

• INPUT and PRINT commands 

In order to execute List (a), it is necessary that both the 
value of X and the value of Y be given. 
Then the obtained value must be displayed. 
First, input the value of X and Y as follows. 

10 INPUT X 
20 INPUT Y 
This can also be written on one line as follows. 



10 INPUT X, Y 

When one line is used, be sure not to forget the " , ". 

A "?" will be displayed for each variable to request an 

input. 

It's very simple and convenient to be able to use one 

line, isn't it? 

Next, to display the values of A, B, C and D, input the 

following. 



200 PRINT A 

210 PRINT B 

220 PRINT C 

230 PRINT D 
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*2 Commands required to perform addition, subtraction, multiplication and division 

As with the INPUT command, this can be done using 
only one line: 

200 PRINT A. B. C. D 

Now let's put Lists (a), (b) and (c) together to make 
Lists. 



10 INPUT X. Y 

100 A=X + Y 

110 B=X-Y 

120 C=X*Y 

130 D=X/Y 

200 PRINT A 

210 PRINT B 

220 PRINT C 

230 PRINT D 

240 END 



END on line 240 means the program is complete. But 
the program can still be executed even without it. 

• Program write-in and execution. 

Now let's write the List 6 program into the PC-4 and 
execute it. 

Put the PC-4 in the WRT mode in order to write in the 
program. 

MODE 1 rrnxle, 

C L E A R A EXE 
After pressing the above keys, the display will be as 
follows and the will blink. 



See page 62 of 
Chapter 3 for an 
explanation of tfi 
l/l/R T m(}de and 
the flUN mode. 
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This means that there is no other program written in 
the P0 program area. 



Then write in List 6. 

Next, to execute the program, press the following keys 

to designate the RUN mode. 



I MOD EI 10 






The display will be as follows. 



RUN 

DEG 




READY 


P0 



Then press the following keys. 

[aOdixi or S)[t) 

To execute a program other than P0, for example the 
PI program, press the following keys while in the RUN 
mode. 

PI 
,S . '• 

That program will be executed immediately. 



Now let's execute the List 6 program which was written 
in program area P0. 

When execution begins, a "?" will be displayed. This is 
a request to input a value for X. Input the value.. 
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"^-^ Commands required to perform addition, subtraction, multiplication and division 

For example, input 30. Then press the (EXg Key again 

and another "?" will be displayed. This is a request to 

input a value for Y. For example, if you input 60 and 

press the iX§Key, 90 will be displayed. This indicates 

the value of A. At the time that this numerical value is 

displayed, STOP will appear on the upper right of the 

display. 

This means that the program stops when it displays 

one answer. If iXE] is pressed again, the value of B will 

be displayed and STOP will appear again. 

The procedure and displays are as shown below. 



po 

Li: 



[3J10 
[exeT 

r6][0 



EXE 



EXE 



lEXE 



Cl 



XE 



9 



v_ 




30 

E 


"""" ■"""■™\ 








■^■^^■' — '\ 


90 


STOP ~^ 


^-30 


STOP "^ 


1800 


STOP 


0.5 


""stop""" 





--■ Hequest to mput value 1oi X 

'■- Input 3ijj for X. 

--- Request to input value for Y 

-■■■ Input 60 for Y. 

Awaiting next lEXE) key input 

^- PRINT Aexepution 
iA = X + Y) 



■'-■ PF'IINT B execution 
m = X --^^ Y) 



Pfi'iNT' C cixecution 

(C = X * Y) 



PRliMT execution 
(D = X / Y) 

^ lENO execution 
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• Character strings 

The program in List 6 only uses two variables (X and 
Y). When more variables are used, however, it becomes 
unclear to which particular one the "?" applies. We will 
avoid this confusion by using a method known as 
character strings. These are easy to use. Simply enclose 
the character string in quotation marks (" "). 
Character strings can be used in both INPUT statements 
and PRINT statements. For example, "ABC", "X=", 
etc. 
Let's rewrite List 6 by adding character string. 



10 INPUT "X=", X 
20 INPUT "Y=", Y 



jtwef 






qti 1 30 di 



OK! 




200 PRINT "SUM="; A 

210 PRINT "DIFFERENCE="; B 

220 PRINT "PRODUCT="; C 

230 PRINT "QUOTIENT = "; D 

240 END 
The command on Line 10 is to display the character 
string "X=" and to input a value for X. A comma (,) is 
required between "X=" and X. 

The command on Line 200 is to display the character 
string "SUM=" and to display the value of variable A 
subsequently. 

A semicolon (;) is required between "SUM=" and A. 
If the comma and semicolon are used incorrectly, an 
error will occur on lines 10 and 20. On line 200, only 
"SUM=" would be displayed and subsequent pressing of 
lEXEl would show the sum in variable A. This also applies 
to lines 210, 220 and 230. 
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4.3 Repeating any number of times 



• FOR ~ NEXT loop 

In Chapter 3, we made a program to obtain the total of 
the numbers 1 through 10 and the square sum. We also 
stated that the computer is excellent for performing 
such repetitious work. 

In the program in Chapter 3, an IF ~ THEN conditional 
statement was used for input data. Here we will use a 
FOR ~ NEXT command to achieve the same thing. 
First, let's look at an example. 



^m 



10 A=0 : B=0 

100 FOR 1=1 TO 10 

110 A=A+ I 

120 B=B+ I t 2 

130 NEXT I 

140 PRINT "SUM TOTAL:" 

150 PRINT "SQUARE SUM: 

160 END 



A 
; B 



The following statement appears on line number 100. 

FOR 1=1 TO 10 

From now on, each collective command will be called 

a "statement". 

FOR means "while — ^ ^ ^ " 



Then if "I = 1 to 10" is inserted above, this 




means 
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"while variable I takes values from 1 through 10, 
execute the operations on line numbers 1 1 and 1 20". 
The following statement appears on line number 1 30. 

NEXT I 

This is a statement which corresponds to FOR. It means 

"increase the value of I by 1 only". 

This kind of command is generally called a "FOR ~ 

NEXT loop". 

In summary, the FOR ~ NEXT statement means 

"while variable I takes values from 1 to 10, repeat and 

execute the statements on the line numbers which are 

between the FOR and NEXT statements". 

This operation is shown in the Figure below. 



100 FOR M TO 10 



I equals 1 I equals 3 I equals 10 

I Fquals 2 I equals 9 



Repe 


at 111 


(til V- 


''1C 




110 


A = 


A + 


] 




120 


B = 


B + 


I t 





r^0 NEXT I 



execution 



'■V 



I becomes 2 I becomes 9 

I becomes 3 I becomes 10 

To next line 
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4.3 Repeating any number of times 



This kind of FOR ^ NEXT loop is used frequently in 

BASIC, so remember it well. 

By the way, in this example, the variable was increased 

by 1. Depending on the situation, other numbers may 

be used as an increment. If 2 is used, for example, the 

increase in the variable will be something like 1,3,5, 7, 

etc. 

To set a different increment other than 1 , add STEP and 

the new number. In the case of increasing by 2, input 

the following. 



FOR 1 = 1 TO 1 1 STEP 2 

Using negative values, decrementing can also be done. 
The variables used in FOR ^ NEXT statements are 
called "loop variables". The first value is called the 
"initial value". The last value is called the "final value". 
The incrementing value is simply called the "increase" 
or "step". 



Wll 



• Multistatements and powers 

Please take another look at List 8. You 

symbols which have not been used before. 

First, if you look at line number 1 0, it reads as follows. 



see two 



10 A=( 



.0 



A = is a statement to substitute for variable A. 
B = is also a statement. However, there is a colon (:) 
separating the two statements. 

In BASIC, it is possible to write more than one state- 
ment on a single line. This is called a "multistatement". 
Next, if you look at line number 120, you will see the 
following. 

120 B=B + I I 2 

The arrow pointing upward is the power symbol. For 
example, I t2 means 1^ If it were I 13, this, would 



// STEP is used, 
the variable will 
be increased in 
regular steps. 



I see! 




Power It) 



mean 



etc. 
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Any number may be used for the exponent value as 
long as it is a positive real number. 
In the example below, write 2 as the value for variable 
A and then obtain the square, the third power, the 
square root and the one-third power. 



r 



A 2 

aI 

1 
A3 



A=2 EXEj The cursor will blink. 

■ At 2 EXE) 4 

• At 3 EXB 8 

i>!At. 5 EX|J 1 . 4 142 13562 

-<)At (1/3) EXE) 1 . 25992105 




In the above example, a slight explanation is required 
about the one-third power. The 1/3 power is in paren- 
theses because, as in mathematics, priority is given to 
operations enclosed in these. 

Therefore, the operation to obtain the one-third power 
of A is written as follows. 

A t (1/3) A^==Va 



If the operation were written as shown below, without 
the parentheses, it would mean to "divide the 1st power 
of A by 3". 



•A' :^ 



At 1/3 



• Line insertion and changing 

Take another look at List 8. The initial value and final 
value in the loop variable are 1 and 10 respectively. 
These can also be changed to variables. List 9 shows 
changes made from List 8. 
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10 A=0 : B=0 

20 INPUT "TOTAL 
100 FOR 1=1 TO N 



4.3 Repeating any number of times 



= ", N 



1 60 END 

It is not necessary to write in all of the line numbers 

in order to test this program. 

This is because the PC-4 has the following features. 

(1) Even when the power switch is turned off, the 
stored program will not be erased. 

(2) The line numbers are automatically arranged in 
ascending order. For example, even if line number 100 
is input before line number 10, they will appear in the 
proper sequence when the program is listed. 

(3) In case of inputs with the same line number, the last 
input cancels the previous input. 

Suppose List 8 is written in program area P0. 

(a) Input line 20 statement as shown in List 9. 

(b) Change line 100 statement in List 8 as shown in 
List 9. 

This will result in the old List 8 being changed to the 

new List 9. 

As a test, input 1000 for N and obtain the sum and 

square sum of the numbers from 1 to II 

Were the results as follows? 

SUM TOTAL 



SQUARE SUM 



: 500500 

: 333833500 




Heyl Nothing's 
coming out/ 
Be patient' 7"/)e 

P&4 is word- 
ing i/e/y itara' to 
do f/w's difficuit 
calcuiation. The 
a/jsw«fs win ije 
dispiayed after 
aifoiit 2 minutes 
and 45 seconds. 
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4.4 Which one is the largest ? 




When inputting data, we sometimes want to obtain the 

maximum value, the minimum value, and the average 

value. 

This is especially true when we analyze test results or 

height and weight data. 

To obtain an average value, total the data and divide by 

the number of data elements. You probably have an 

idea of what the program would look like. 

But, how does the computer determine the maximum 

and minimum value, and how is the program written? 

The approach for obtaining the maximum and the 

minimum values are basically the same. We will begin by 

explaining how to obtain the maximum value. 



• Program to obtain maximum value 

X is the variable used for data input. The variable for 

the maximum value is M. 

First, input the least possible value for M. 

For example, in the case of test results, there are no 

results below so input M = 0. 

Next, compare M and X. If X is equal to or greater than 

M (X ^ M), substitute the value of X for M. 

This only compares the number of data. If we express 

this approach using an illustration, it would look like 

tiie illustration on the next page. 
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4.4 Which one is the largest? 



I Thwrc; are 4 cliildren, namely, A 
Itirough D. Thest' children hove 3, 

I 6, 4 and 8 pieci's ol candy respec- 
tively. 

How many pieces of c^indy docs tht 
child ys/ith tiic ntost candy have. 

If we look at this problem using a 
computer approach . . . 

(1 ) Prepare 2 empty dishes. Dish X and 
Dish M. 



16) Now take the candy from Dish M 
(which is the least amount) and put 
it aside. Then move all of 
the candy from Dish X 
into Dish M. 






Xiish M- 



^^--"^ ^ V 

f There are now a^^- 

maximum of 6 / 

-jaieces. 

ij) Next, put all of child C's candy 
into Dish X. Tfien compare. 




>1 Input C 



Next, put all of child A's candy 
into Dish X. 



Input A 




^Dish M.- 



(3) Which dish contains the most 

candy. Dish X or Dish M? 

Dish X contains more, doesn't it? 



V,PTsh_X. 




(4) Now move all of the candy from 
Dish X into Dish M. 




\'j) Next, put all of child B's candy 
into Dish X. 

Then compare to see which dish con- 
tains the most candvc 

Input B /;C^\ V I " 

/Dish X has 

the most. 






(8) Now take the candy from Dish X (which 
is the least amount) and put it aside. Then 
put all of child D's candy into Dish X. Now 
Input D compare to se^e which dish con- 

\<^, r7^3r~\ tains the most. .y^'~~~~~~- 

^DislTM, 

Since M has the least, take the 
candy out of Dish M and put it aside 
and take the candy from Dish 
X and place it in Dish M. 





1 10) At this point, all of the candy 
has been placed into dish X, hasn't 
it? Well, how many pieces of candy 
remain in Dish M? 8, right? 
This means the child with the most 
candy had 8 pieces. 

^:>3 lOJ \fy^ \/yi \/:>i to^ K^J t/.'>5 

I In this irianner, the computer does 
' not simply make one comparison but 
j compares two at a time and repeats 
; this a number of times to get the 
answer. 
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Do you have a rough idea of the computer approach to 

this i<ind of problem? 

If we make the illustration of the previous page a little 

more formal, it will looi< lii<e the figure below. 

This figure is called a "flowchart". When programming, 

this is a very convenient tool because it mai<es the 

procedure very clear and easy to understand. 

If we follow the flowchart we can make a program as 

follows. 

10 M=0 

20 INPUT "TOTAL=", N 

30 1=0 

40 INPUT "DATA=", X 

50 1=1+1 

60 IF X>M ; M=X 

N -- Number of data 100 IF I <N THEN 40 



Flowchart to determine maximum value 

Start 

I M ■«- Least possible I 
' value 



I^^0 1 110 PRINT "MAXIMUM=" ; M 

140 END 



Y 



VES 



86 



• IF and IF-THEN 

Take a look at line 60 and line 
100 in the above list. 
The IF command is used different- 
ly on line 60 and line 100. 
The IF command on line 60 
:I<N J means "if X is greater than or 

equal to M, execute the command 
written after the " ; " (semicolon) 
and substitute the value of X for 
M. 

If this command is expressed 
grammatically, it will read as 
follows. 

IF comparison formula; com- 
mand 



X>M 


L->.^ 


NO 


hex 


If^I + 1 




I 




^ I-N 




M 


Printout of 




maximum 




value 



End 



4.4 Which one is the largest? 

On the other hand, the IF command on line 100 means 
"if I is less than N, jump to line 40." 
If this command is expressed grammatically, it will 
read as follows. 

I F comparison formula THEN line number 
In this manner, a command which begins with an 
IF can be used in two ways. This is very convenient 
when programming. 

• Obtaining minimum value and average value simul- 
taneously. 

Now let's make a program to obtain the minimum value 
and average value simultaneously. 

To obtain the average value, input the total of the data 
for variable A and divide by number of data N. Also, 
to obtain the minimum value, the approach is the 
opposite of that used to obtain the maximum value. 
If S is already the variable for the minimum value, the 
program will be as follows. 



10 


M=0 ; s = i00 : 


20 


INPUT "TOTAL=", N 


30 


1=0 


40 


INPUT "DATA=", X 


50 


1=1+1 ; A=A+X 


60 


IF X <M THEN 80 


70 


M=X 


80 


IF X ^-S THEN 1 00 


90 


O " A 


100 


IF KN THEN 40 


110 


PRINT "MAX1MUM=" 


120 


■ ' ; ' ; 


130 




140 


END 



M 
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4.5 Challenging the troublesome deviation 
values 




Recently, there has been an increase in the evaluation 

of grade school and high school tests using deviation 

values. You have probably encountered troublesome 

deviation values yourself. 

By the way, do you know how to obtain deviation 

values? 

The majority of the people probably do not know how 

to obtain it. Let's challenge this problem by using the 

PC-4. 

• What is the deviation value? 

Let's assume that we are collecting test scores from a 
number of students and that we group similar scores 
together. Then let's assume that if we plot the number 
of students in each score range (this is called the "distri- 
bution"), as shown in the figure on the next page, a bell- 
shaped curve (this is known as the "normal distribu- 
tion") is formed. 

The point at the top of this bell-shaped curve is the 
mean of the distribution. Beginning there if we draw 
points such as ±1, ±2, ±3, etc., it can be seen that the 
number of students in the -1 to +1 score range is 68% 
of the entire group, that the number of students in the 
-2 to +2 range is 95% of the entire group, and that the 
number of students in the -3 to +3 range is 99.7%. 
Then the deviation values are as follows: 50 at 0, 60 
at 1 , 70 at 2, 80 at 3, 40 at -1 , 30 at -2 and 20 at --3. 
It can be seen from the figure on the right that the 
students with a deviation value of 70 (that is 2 standard 
deviation intervals from the mean) are bright students 
and are in the top 2.5% of the class. 
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4.5 Challenging the troublesome deviation values 




Only one or two students out of a thousand have a 

deviation value of 80. They are geniuses. 

However, actual scores do not have this kind of normal 

distribution. 

Changing the subject slightly, the complicated formula 

to obtain deviation values is shown below. 

Looking at this formula, you may get a headache or be 

thoroughly confused. So just look at the part printed in 

blue. 



Average n 

:,u,.. "2xi /N 



Deviation 
value 



Sxf - N X (average value)^} /(N 



ition 
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Chapter 4 Now Let's Learn BASIC 



• Program to obtain deviation values 

Before beginning programming, please take a look at 

List 4 on Page 67. 

This was a program for obtaining the total of N numbers 

of data elements and the square sum simultaneously. 

If we use the same programming, we will be able to 

solve the problem smoothly. 

For example, if we make A the variable for the total of 

N number of data, and make C the variable for the 

average value, the formula for obtaining average value 

C is as follows. 

C = A/N (1) 

Also, if we make B the variable for the square sum, 

The formula for obtaining value V is as follows. 
V=B-"N*C*C (2) 

Then if 

is taken, this becomes 
the standard deviation D. The formula for obtaining 
the standard deviation D is: 



D=v/ V/(N-1) (3) 

Then to obtain deviation value H when your score is 
Y, the formula is as follows. 

H = 50 + 10* (Y-C)/D (4) 

In List 4, an IF ~ THEN statement was used to make a 
loop. However, at this time, we will make a loop using a 
FOR -NEXT statement. 
Anyway, we will show you the list first. 
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4.5 Challenging the troublesome deviation values 



10 VAC 

20 INPUT "TOTAL=", N 

30 FOR 1=1 TO N 

40 INPUT "DATA=", X 

50 A=A+X : B=B+X *X 

60 NEXT I 

70 C=A/N "' ' •" ■"^'- Formula (1) 

80 V=B-N*C*C ------ ^ Forrnuia (2) 

90 D=SQR (V/(N-1 )) ' ^FomuilaO) 

100 PRINT "AVERAGE="; C 

110 PRINT "STANDARD DEVIATION=" ; D 

120 INPUT "SCORE=", Y 

130 H=50 + 10 *(Y-C)/D ■--■'--■- Formula (4) 

140 PRINT "DEVIATION VALUE=" ; H 

150 GOTO 120 



• How to operate 

Input the following data and obtain the average value, 

the standard deviation and the deviation value. 

Total: N = 10 

Data ; 30, 50, 80, 40, 20, 70, 60, 90, 50, 80 
If you execute this program(press Ifi] [u] Exe) or - 
!'"f ExE ), the PC-4 will request the total as follows. 

TOTAL=? 
InpjJt the number of data elements (10) and press the 
ExeI Key. 
Then the PC-4 will request the data as follows. 

DATA= ? 




v^ 



C3 
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Input the ten numbers. 

Then the following will be displayed. 

AVERAGE =57 

iEi 

STANDARD DEVIATION =23.11805451 

Then press the IXE] Key and the PC-4 will request 
your score as follows. 

SCORE = ? 

If your score was 90, input this. Then the following 
will be displayed. 

DEVIATION VALUE =64.27 

This program has no end since the last line is GOTO 
120, which causes the computer to ask for the score 
repeatedly. 

To stop this, press the [s TOP] Key. (However the (STOP) 
Key only stops program execution. To completely 
finish the processing, just press [MODE] [0] .) 

• VAC 
In PC'4 BASIC. Take another look at List 1 1 . There are some commands 
be sure to me VAC which have not been mentioned before. 

One of these is the VAC on line 10. 

VAC is an abbreviation for "variable all clear". 

It clears all of the values for variables A through Z. 

In this program, it was used to make variables A and B 

ZERO (0). However, at first it may be better to write 

each step in the program (i.e. A = 0, B = 0) so that 

you can see what is actually happening. 

Also as will be explained later, it may be troublesome to 

use VAC when calling up a subroutine. 



independentlY on 
one line. 
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4.5 Challenging the troublesome deviation values. 



• SQR and Parentheses 

SQR, which appears on line 90, is a function to obtain 

the square root and means the same as ">/" ". 

(Also SQR works the same as the t.5 of the Xt.5 which 

was explained on page 82.) SQR is always followed by a 

variable or formula as shown below. 

SQR (variable) or SQR (formula) 

In PC-4 BASIC, the formula can be a single variable. 
For example, 

SQR A 
However, in the case of 

SQR A/(N-1 ) 

SQR A is executed first and then the result is divided 
by (N-1). 

When you desire to obtain the square root of an entire 
formula, the input must be written as follows. 

SQR (A/(N-1)) 

The entire formula must be enclosed in parentheses. 
This appears a bit confusing at first glance. In mathe- 
matics, parentheses and brackets are used to separate 
operations as shown below. 

[A/(N-1)1 

However, programming languages, including BASIC, 

only use parentheses. Therefore, the sequence of the 

parentheses and the corresponding operations are very 

important. 

For example, on line 90, the formula is written as 

follows. 

Same as mathematical oarentheses 




SOR (A/ (N-D) 



Same as mathematical brackets 
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4.6 Obtaining separate totals 



One of the many features of a computer is its ability 

to separate and group data. 

For example, suppose a store wants to separate three 

categories of items (this is called "itemizing") and to 

calculate the total price for each item. 

When this is made into a program, the main outline can 

be thought of as follows. 



Start 



Make all 



memories ( 





ITEM: K$ 








K$ ■ E" 


YEf 


NO 
AMOUNT: 






X input 








KS.'A" 


YES 






NO 






YES 
B=B+X 


K$:'B" 
NO 

K$:X" 






^U---^'A+X 






I C-C+X 


NO 







Next 

Flowchart for item classification 



(1) Express the three items as 
A, BandC. 

(2) First, input one of the 
items. 

(3) Determine which item was 
input. 

(4) Compute the item total. 

(5) Input another item. 

(6) Display the total for each 
item and the grand total. 

Steps (1) through (5) in the 
above approach are explained in 
greater detail in the figure on 
the left. 

Now let's take a look at the 
program list which corresponds 
to the figure. 
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4.6 Obtaining separate totals. 



10 A=0 : B=0 : 0=0 : S=0 

20 INPUT "ITEM". 1$ 

30 IF |$="E" THEN 120 

40 INPUT "PRICE", X 

50 IF 1$ ="A" THEN 90 

60 IF 1$ ="B" THEN 100 

70 IF 1$ ="C" THEN 1 10 

80 GOTO 20 ,,',:, , , 

90 A=A+X : GOTO 20 

100 B=B+X : GOTO 20 Computes to 

110 0=0+X : GOTO 20 

120 PRINT"A=" ; A 

130 PRINT"B=" ; B 

140 PRINT"0=" ; 

150 S=A+B+0 

160 PRINT "GRAND TOTAL=";S 

170 END 

The example in List 12 is very simple in format. 

However, it illustrates a very convenient operation. 

• Character variables 

In List 12, a new type of variable appeared, namely, 

1$. 

We already know that there are 26 variables from A 

through Z. However, this is the first time that a 

variable with a symbol attached has been used. 

Variables with this symbol ($) attached are called 

"character variables" and character strings can be input 

into these variables. 

This can be considered to be a variable version of 
character strings (characters enclosed by quotation 
marks) which have been previously explained. 
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The ability to use these character variables is one of 
the reasons why BASIC is used as a language tor 
computers. 

Line 20 means "input a value for l$". An alphabetical 
character must be input into 1$ and not a number. 
Numbers such as 123, 321, etc. could also be input 
but the computer will not interpret these numbers as 
numerical values. That is, they will not be interpreted as 
"one hundred and twenty three" or "three hundred and 
twenty one'.' Rather they are interpreted as separate 
characters such as "1", "2", "3" or "3", "2", "1". A 
maximum of 7 characters may be input into one 
character variable. 




Try following 
JO /l|=<7,, 

30 PR /Air 
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• IF ~ THEN Precautions 

IF ~ THEN have already been explained on page 86. 
However, there are some precautions that you should 
observe when using these commands. 



4.6 Obtaining separate totals. 

Line 30 reads as follows. 

IF l$="E" THEN 120 
If this is written grammatically, it will read as follows. 

IF conditional formula THEN line number 

Therefore 1$ = "E" is a conditional formula and not a 
stfbstitution statement. Until now, we have seen that 
the eqpal symbol means "substitute the value on the 
right side for the variable on the left side". However, in 
the case of an IF '^ THEN statement, it is used 
differently. So please, be careful. 
Here it means "if that conditional formula is properly 
concluded, then jump to line 120". 




• Program design 

If, in the program, there is a portion which is not 
consistent with the BASIC grammar, the PC-4 will 
indicate the error type and location. ERR2 P^-30, 
for example. 

However, if the program design itself is faulty, 

problems could arise. 

For example, suppose the List 12 program is executed 

(RUN) and "D" is input as an item. 

Next, if a price is input, the program execution goes to 

line 20. 

If you meant to input "A" but input "D" by mistake, 

the calculation to obtain the total for item A will not 

be executed, and consequently the total for A will be 

wrong. 

Therefore, we must devise a system to prevent human 

error. 

So we change line 80 of List 12 to read as follows. 



80 PRINT "ITEM ERROR !!" : GOTO 20 



Chapter 4 Now Let's Learn BASIC 

Do this, input D, and see what happens. 
The computer will tell you if you have input an incor- 
rect item. 

Of course, there are many prevention methods depend- 
ing on the skill and desires of the programmer and the 
memory size the computer has. 

Let's take a look at one more aspect of program 
design. 

For the program List 12 on page 95, when the item 
and price are input, the computer requests the input of 
another item and price, continuing as an endless pro- 
gram. A method for terminating the program must be 
determined in order to read out the results. 

Line 30 is used for this purpose. 

If an "E" is input at this point, the program loop will 

be terminated and the totals will be displayed. 

If "E" is then input when the PC-4 makes the request 
"ITEM ?", the totals for A, B and C and the GRAND 
TOTAL would be displayed and the execution ter- 
minated. 



Note 

-Another character variable ($) <> 

It has already been explained that in PC-4 BASIC, when a $ symbol is 
attached to the end of the respective variables A through Z, they become 
character variables. The length of the character string which can be stored 
in this character variable is limited to 7 characters. However, the $ 
symbol can be used alone as a character variable and permits storage of 
much longer character strings. In this manner, up to 30 characters can be 
stored. 

As a test, select the RUN mode and input $ = 'ABC...XYZABCD" iMI . 
If you attempt to input 31 characters, ERR2 will be displayed. 
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^,,7 Another type of variable 

— array variables 



• What are array variables? 

We have already discussed variables in which numerical 
values can be stored and character variables in which 
characters can be stored. 

There is another important variable that is used for 
programming, it is called an "array variable". Array 
variables are formed by attaching numbers enclosed in 
parentheses to the ends of variables A through Z 
(A(0),A(1),A(2)orB(0),B(1),B(2),etc.). 
Array variables can store numerical values the same as 
variables A through Z. 
It should be noted at this 
point that in PC-4 BASIC 
variable A and array vari- 
able A(0) operate in the 
same way. Corresponding- 
ly, array variable A(1) is 
the same as B. 
Since there are 26 letters 
in the alphabet, A(25) is 
the same as variable Z. 
The table on the right 
shows the relationship of 
variables and array vari- 
ables. 




iable ot rela- 
tionships of 
variables and 



Variable 



Array variables and 
variables which can be 
used at the same time. 



\M A A 



A 



Ad! B(») n B 

A(2! Bii) cm c 

Ai:i) B!2i Cili \)M 



A 



B B 



I) 1) 













X 


X 



Y ACli BO tX?3 l)2l! ••• Y^Mi V 

7. AS) B':?|! C^3 1)^3 ■■■ Y B Z^ifli 



99 



Chapter 4 Now Let's Learn BASIC 



When you use an array variable, the equivalent single 
letter variable cannot be used. As can be seen from the 
table, the number of array variables and variables 
which can be combined is 26. 




• Why are array variables required? 

Since the number of variables which can be used is 26, 
you might wonder why having array variables makes 
any sense. The reason for having them is that they can 
help in simplifying programs that are otherwise com- 
plex. 

For example, let's take another look at List 1 1 . 

This program was used to obtain the average score and 

standard deviation using the test scores of a certain 

number of students. 

The basic procedure for this program is as follows. 

(1 ) Input the scores of N students. 

(2) Obtain the average score and standard deviation. 

(3) Input the individual students' scores. 

If we look at this program closely, the scores had to be 
input twice, once in Step(1) and again in Step (3). This 
is a waste of time. 

Although you took great pains to input the students' 
scores in Step 1, this was of no use other than for 
storing them in the computer memory. 
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Let's assume that the number of students is 10 and 
you input the scores into the 10 variables from A 
through J as shown below. 

INPUT A 

INPUT B I 

Input (jf the 5c£;res of the 10 students. 



INPUT J ' 

To make it easier to understand, let's input the follow- 
ing after the respective INPUT commands. 

INPUT "A=",A 

If done in this way, the program would be very long. 

So storing the scores in the memory is not such a good 

idea after all. 

Besides, the capability of the computer to perform 

repetitious operations is not used to its full advantage. 

This is where the array variable comes into play. 

For example, let's consider the processing of the scores 

of the 10 students and use array variables A(0) through 

A(9). Remember that variables A through J cannot be 

used at this time. 

First, let's key in the part of the program for inputting 

the scores of the 1 students. 

10 N=10 
•■ 20 FOR K=0 TO N-1 
n,p«,t ,0 30 PRINT "K=" ; K ; 

i 




40 INPUT "DATA=", A(K) 
50 NEXT K 



Assign numbers 
from through 9 
to the students 
and inpijt each 
score irrto an 
array variable. 



By simply doing this, the scores of the 10 students are 
input into variables A(0) through A(9). 
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Then we can easily obtain the average, standard 
deviation and deviation value. 

At this time, since the scores of the students are input 
into memories A(0) through A(9) (actually A through 
J), the program is as follows. 



•■ I- IS the vanabie into whic 
'he lotai and average are 
input. 

Q is the veiriabie into whii 
the square surn is input 

110 FOR K=0 TO N-1 



100 P=0 : 0=0 



120 P=P+A(K) 

130 0=0+A(K)T2 

140 NEXT K 

150 P=P/N Average 

160 V=0-N*P*P 

170 V=S0R(V/(N-1 )) Standard deviation 

Up to here, the average and standard deviation have 
been computed in preparation for obtaining the 
deviation values. The deviation values can be calculated 
in sequence for student numbers through N-1. (In 
this case,0 through (10-1), or through 9.) 



200 FOR K=0 TO N-1 

210 X=50 + 10 *(A(K)-P)/V ^- Deviation value 

220 PRINT "DEVIATION VALUE :";K;"=";X 

230 NEXT K 

240 END 

If Lists (a), (b) and (c) above are combined, you will 

get a single program. Using this program, you can store 

all of the scores and obtain the deviation values of all 

of the students. 

By using array variables, the scores need not be input 

twice. 
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4.7 Another type of variable — array variables 

• Let's become skilled at using "program-like" vari- 
ables. 

In the previous program, the variables on lines 120, 
130, 150 and 170, etc., are used in a manner which is 
unthought of in mathematics. 

This is because in BASIC, as was explained previously, 
the equal symbol (=) is used differently than the equal 
sign used in mathematics. 
For example, lines 160 and 1 70 read as follows. 

160 V =Q--N *P *P 

170 V=SQR(V /(N-l )) 

The use of V here seems confusing. 

The contents of the blue Vs on line 160 and line 170 

are the same. However, the contents of the black V 

and blue V will be different because the value 

computed using the blue V is substituted for the black 

V. 

Also, if it is not necessary to retain the scores of the 

individual students and only the deviation values are 

desired, line 210 may be written as follows. 

210 A(K)=50 + 10*(A(K)--P)/V 
In this manner, if you become skilled at using the same 
variables over and over, you will avoid the confusion of 
using numerous variables. 

Note 

Expansion of Variables (DEFM) 

Normally, 26 variables (from A through Z) are used with the PC-4. 

When array variables such as A(0) through A(25) are used, the number of 

variables is still 26. ^^^^^ 

If you press [Sj jy) il?5 , the display will show ***VAR:26. This 

indicates that 26 variables can be used. 

If you want to use more than 26 variables, press [Sj (yj , enter a 

numerical value, then press [EXE] . In this manner, the number of variables 

which can be used will be increased by the number which was input as the 

numerical value. 

For example, if 5 is input as the numerical value, array variables A(26) 

through A(30) can also be used. ***VAR:31 will be displayed. 

A maximum of 94 variables can be used. 
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4.8 Jump ! -GOTO 



It has already been explained that the PC-4 reads 

commands in line number sequence from low line 

numbers to high line numbers. 

However, regardless of the line number, it is possible to 

jump forward and backward. 

The command to accomplish this is the GOTO 

statement. 



• How to use the GOTO statement 

As mentioned on page 96, an IF -- THEN statement 
can also be used to jump forward and backward. 
However, the IF -- THEN statement causes a jump 
only if a certain condition is met. The GOTO state- 
ment jumps to the desired line number without any 
condition being set. 

The GOTO command is always accompanied by a line 
number. The line number indicates the location where 
program execution will jump. GOTO 1 00, for example, 
causes program execution to continue in line number 
TOO. 

However, this is not the only use of the GOTO 
command. 

/' 29 GOTO 69 ) 



60 
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4.8 Jump! - GOTO 

Variables or formulas can also be used as destinations 
for a GOTO command. 

Of course, there must be a line number to identify 
where the variable or formula is located. The jump 
destination can be changed, however, if the value of 
the variable or formula in question also changes. 
For example, suppose we have a program as follows. 

100 GOTO A 
200 S=X+Y 
300 P=X*Y 

If the value of A is 200, the sum of X and Y will be 
obtained, if the value of A is 300, the product of X 
and Y will be obtained. 

The above example is simple but, nevertheless, it gives 
an idea of the programming concept. 



10 INPUT "SUM :i PRODUCT :2",B 

20 IF B = 1 THEN 50 

30 IF B=2 THEN 50 

40 GOTO 10 

50 INPUT "DATA X=", X 

60 INPUT "DATA Y=", Y 

100 GOTO B *100 + 100 

200 S=X+Y - 

210 PRINT "X+Y=" ; S 

220 END 

300 P=X*Y • 

310 PRINT "X *Y=" ; P 

320 END 
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In this program, if 1 is input into variable B, the value 
obtained from the formula in the statement GOTO 
6*100+100 will be 200(1x100+100) so the program 
will jump to line 200 and obtain the sum of X+Y. 
If 2 is input into variable B, the value obtained from 
the formula will be 300(2x100+100) and the program 
will jump to line 300 and obtain the product of X 
and Y. 

If any other number than 1 or 2 is entered, the 
program returns to line 10. 



Start 



input 



• The program compensates for human error 

The portion of the program from line 10 to line 40 is a 
programming method to compensate for human error 
and one that's used frequently in actual programming. 
If we express this using a flowchart, it will appear as 
shown in the figure below. 

For example, if or a value of 3 or greater is input 
into variable B, the GOTO command on line 100 
cannot be executed. As soon as execution is 
attempted, an error will occur. 

The program accomplishes this by 
determining if the value input for 
B is correct (either 1 or 2). 
If it is not correct, the program 
will recycle and make notification 
that the value input was other 
than 1 or 2. 

Line 40 performs this operation. 
You should remember this use of 
the GOTO statement since it is a 
fundamental programming tech- 
nique. 



B=l 


YES 




'.NO 






B=2 


YES 




NO 






Next ; 
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4.9 Frequently- made errors 



So far, we have written and executed various programs. 
While doing this, you probably encountered the 
following kind of display quite a few times. 

ERR 2 P0-30 

In BASIC, various kinds of errors can occur (gram- 
matical errors, mathematical errors, etc.). 
The PC-4 can recognize nine kinds of errors, as shown 
in the instruction manual. Notification of these errors 
is made using ERR 1 through ERR 9 on the display. 
You should be able to understand the meaning of each 
of these errors so that you know what is happening 
when they occur. At this time, we will take a look at a 
few of the most commonly made errors. 

I Example 1| 

In BASIC language, the grammar permitted to be 

used for writing a program has been predetermined. If 

the rules of this grammar are violated in the slightest 

way, an error will occur. 

For example, suppose you attempt to make the 

following input. 

10 IF X = 1 THEN GOTO 100 

If GOTO is input immediately following THEN, a 
grammatical error occurs (100 should follow THEN 
and GOTO should be deleted). The display will show: 

ERR2 P0-10 

ERR 2 means a grammatical or syntax error has been 

made. 

P@-l means the error is on line 10 in program area P@. 
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[Example 2| 

Next, we will discuss mathematical errors. 

Instead of using a program, we will use examples in the 

RUN mode (manual calculation). 

For instance, suppose we attempt the following. 

X = 01 EXE 

Y = 1 /' X EXE 
This will cause an error and the display will show 

ERR3 
The calculation attempted, 10^0, is not mathematical- 
ly possible. ERR3 indicates that a mathematical error 
has occurred. 
Let's try another one. 

S R - 1 EXE 
This is an attempt to obtain the square root of --1 
(\f^). This is known as an "imaginary number". 
Therefore, a result cannot be obtained and ERR 3 will 
occur. 

[Example 3] 

Another kind of error may occur when a GOTO state- 
ment or a GOSUB statement (GOSUB will be ex- 
plained later) has a destination line number which is 
not contained in the program. 
Let's attempt to input and RUN the following. 

10 GOTO 20 
If the program does not contain a line 20, an error will 
occur and the display will show. 

ERR4 P0-10 

Note 

MID function 

The Note on page 98 discussed character variables. The MID function is 
used to extract a portion of the character string of the character variable. 
The MID function has two arguments and is written as MID (N, M). This 
means "extract M number of characters beginning with the Nth number 
from the left of the character string. Let's execute the following. 
10 $= "SMITH BROWN JONES" This will result in the name 

20 PRINT MID(7, 5) BROWN being extracted. 
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4.70 The game's leading players 

-random numbers 



• The story of random numbers 

Have you ever played a video game? Random numbers 

play a leading role in video game programs. 

For instance, consider the invader games. You never 

know where the invaders will appear or where they will 

attack. They appear and disappear at random and quite 

suddenly. 

This unpredictability is one of the most interesting 

feature of video games and one reason why people 

enjoy them so much. The actual cause of all this 

appearing and disappearing is due to random numbers. 

Let's take a more detailed look at random numbers. 

For example, suppose we have the following series of 

numbers. 

12 3 4 5 7 

Can you guess what number should be in the square? 
That's right. It's 6. 
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Well, how about the following? 
1 4 9 16 36 

This is a bit more difficult but you can see that the 
series progresses by the squares of the numbers 1 
through 6. 

Therefore, the number in the square should be 25. 
How about the following. 

74 40 52 62 86 8 80 

This time, the number is already shown in the square. 

However, probably none would guess why the number 

is 8. Even if you guessed it,this doesn't mean you are a 

genius because in this case it is just a random number. 

Any number could have been used. 

The numbers in this kind of unrelated series of 

numbers are called random numbers. 

In other words, random numbers have no set pattern 

so there is no way to predict the next number in 

advance. 

• Function for generating random numbers — RAN# 

The PC-4 has a function for generating random num- 
bers. It is 

RAN# 

Select the RUN mode and press the following keys. 

[R][a1|N S " EXEj 

If you execute this function several times, you will 
notice that a different series of numbers appears on 
each successive display. 

The number is a decimal value between and 1. 

However, there is no way to predict what number will 

appear next. 



4. 10 The game's leading players — random numbers 



* Random number generation and dispersion 

Theoretically, a random number has an equal chance 
of being selected as any other number. To verify this, 
we could actually check the dispersion of random 
numbers generated 100 times with the following 
program. 

"mM 10 FOR 1 = 1 TO 100 

20 PRINT RAN#*10 

30 NEXT I 

40 END 

If we were to multiply each random number generated 
by 10, drop the decimal portion, and plot the 
frequency of each number, the graph would look like 
this. 
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As you can see, there is no set pattern. If the num- 
ber of random number generations were to increase, 
the dispersion would become more even. 
For example, if we generated random numbers be- 
tween and 1 repeatedly toward infinity (this is not 
actually practical) and divided the sum of all of the 
random numbers by the number of generations, 
theoretically, the average would be 0.5 and the stand- 
ard deviation would be>/l71T= 0.288 



4.11 The ABCs of games 



As was demonstrated in the previous discussion, a 
balanced set of meaningless numbers will be obtained. 
It was also said that random numbers play a leading 
role in many games. 



• Electronic dice 

In a game where dice are used such as baci<gammon, 
when the dice are thrown (assuming that there is no 
cheating) random numbers from 1 through 6 will come 
up without any particular pattern for each die. In this 
manner, since the numbers come up randomly, we are 
able to play the game. 

Let's use the RAN# function and play a dice game 
using the PC-4. 

Let's call the game "electronic dice". The program for 
"electronic dice" is as follows. 
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10 PRINT "ELECTRONIC DICE" 

20 X=INT (RAN S * 10) +1 

30 IF X>6 THEN 20 

40 PRINT "PRESENT NUMBER:"; X 

50 GOTO 20 

Let's write this program into tiie PC-4 and execute it. 
The first time the keys y "b" EXE are pressed, the 
words "ELECTRONIC DICE" will be displayed. Then, 
press the [ EXE ] Key and the following will be displayed. 

PRESENT NUMBER : number (1 through 6) 
This completes "electronic dice". 



• INT function 

In the above program, a new command was intro- 
duced, namely, INT. 

This is a function to change a decimal to an integer. 
This is expressed grammatically as follows. 

INT numerictil vt^lue or INT (formula) 

Then, the highest integer not exceeding the given 
numerical value will be obtained. 
For example. 



INT 2.9 
INT 0.5 



»0 



INT 

INT 



10.6 
-3.4 



'10 

~4 



Line 20 in the List 16 program generates a random 
number using the RAN# function (for example, 
0.5701793564), multiplies it by 10 (5.701793564), 
makes it an integer using the INT function (5), adds 1 
to it (6) and substitutes it for X. 

Since the numbers on a die are only 1 through 6, when 
the number selected exceeds 6, line 30 causes the 
program to return to line 20 in order to reselect the 
number. 



--0.5" 
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4.12 Hfce game 



In the previous section, we made an electronic dice 

program. 

Let's change this program slightly and make a simple 

dice game. 

You and another player will roll the die one time each. 

The one getting the larger number is the winner. 

First, let's take a look at the program. 

;;::'::; 10 PRINT "DICE GAME" 

20 GOSUB 200 

30 Y=X 

40 PRINT "YOUR TURN :"; Y 

50 GOSUB 200 

60 Z=X 

70 PRINT "MY TURN :"; Z 

80 IF Y>Z THEN 120 

' 90 IF Y=Z THEN 140 

! 100 PRINT "I WIN" 

; 110 GOTO 10 

; ! J 120 PRINT "YOU WIN" 

130 GOTO 10 

140 PRINT "TIE" 

150 GOTO 10 
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• GOSUB and RETURN 

In List 17, new commands were introduced, namely, 
GOSUB and RETURN. 

These commands mean "jump to the line number 
designated in the GOSUB command, execute the com- 
mands of the designated line number and all subse- 
quent line numbers until a RETURN command ap- 
pears, then return to the line following the original 
GOSUB command". 

For example, for the dice game in List 1 7, the number 
on the die must be obtained each turn using the 
"electronic dice" program from the previous section. 
This means that the part of the program which 
performs the same operation would appear twice in 
one program. 

This is a waste of time, so we write the program as 
shown using lines 200 through 220 and remove the 
operations from the main program flow and use a 
GOSUB command when these operations are required. 
A program of this type which is outside of the main 
program flow is called a "subroutine". The main 
program is called the "main routine". 
In this program example, the merits of the subroutine 
are not too apparent. However, in the case of a 
complicated program, the program can often be made 
much easier to follow by using a subroutine. 
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4. 13 Line up ! 




In Section 4.4, we discussed obtaining the maximum 

and minimum values from among a number of data 

elements. 

At this time, let's make a program which will not only 

select one item but will line up all of the data in 

ascending or descending order. 

This ordering of the data is called "sorting". 

We will discuss a method of sorting known as "bubble 

sort". 

• The sorting concept 

As we discussed in Section 4.4, the computer cannot 

determine at a glance which number has the maximum 

value or which has the minimum value. 

It will compare the data one by one and make a 

determination in sequence. 

First, let's take a look at the sorting program only. 
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Sorting subroutine 



200 
210 
220 
230 
240 
250 
260 



V=0 • ^..-.^.^Ftag 

FOR X=0 TO 3 

IF A(X)<A(X + 1) THEN 240 » »''eleft s^de .s larg 

on the next iine 

Y=A(X) : A(X)=A(X + 1) : A(X + 1)-Y : V = 1 



NEXT X 

IF V = 1 THEN 200 ..^. ifVequa' 

RETURN 

This is a program to sort five data elements into 
ascending order. Since there is a RETURN command 
on line 260, this program is handled as a subroutine. 
The commands used have all been seen before. How- 
ever, lines 200 and 230 introduce a new technique 
where the V is used as a flag, a kind of signal. 
Let's take the five data elements shown below and per- 
form the process that the computer uses. 



A(0) A(i; 

96 15 



A(2) 
62 



A(3) 
72 



A(4) 

7 



First, let's take a 
look at the sort^ 
ing program! 




Note .. — ■ -.. 

SET Function O 

The PG4 displays numerical values as real numbers. To test this, 

suppose we obtain SIN 45°. The display will show 0.7071067812. It is 

good to have a large number, but sometimes only one decimal position is 

required and at other times you may want an exponential display. For this 

purpose, we use a function command called "SET". 

SET is used as follows. 

(1 ) SET N Ordinary usage 

(2) SET Fn (real number) n is a number from through 9 

(3) SET En (exponential number) ... n is a number from through 9 
For example, in the case of (2), if SIN 45° is obtained using SET F5, the 
result will be displayed as 0.7071 1 with only five decimal places displayed. 
If this is performed using SET E5 the result will be displayed as 
7.0711 K-01. This means "7.0711 x 10^'". 
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Furthermore, the V on line 200 and line 230 is called a 
"flag". It operates as a kind of signal. Now let's use the 
data and follow the operation from line 200 through 
line 250. 



ine up . . . A{i>=§6 A(1l-=15 A(2>'==62 Af3)=72 A(4)=7 


1 A(0)=96<A(1)=15 (NO, to line 230) Y=96 


A(0) = 15 


A(l)=96 


V=1 


A(1)=96<A(2)=62 (NO, to line 230) Y=96 


A(1)=62 


A(2)=96- 


V=1 


! A(2)=96<A(3)=72 (NO, to line 230) Y-96 


A(2)=72 


A(3)=96: 


V=l 


A(3)=96<A(4)=7 (NO, to line 230) Y=96 


A(3)=7 


A(4)=96. 


V=1 


Since V=l, jump to line 200 and repeat once more. « 






i E ' ' ' ; -Jits of the first time . . . Afi)==15 

1 A{ 

1 A(0)-1 5<A(1 )-62 (YES, to line 240) ... no sort 


AI1|=«2 


Af2)=72 i 




V=0 1 


A(1)=62<A(2)=72 (YES, to line 240) ... no sort 




V=0 


! A(2)=72<A(3)=7 (NO, to line 230) Y=72: A(2)=7 


: A(3)=72 


V=l 


A(3)=72<A(4)=96 (YES, to line 240) ... no sort 




V=l ; 


i Since V=1 , iump to line 200 and repeat once more <-^ 






f '- " ppjj«-^»<i^^»^v.^iiii^^ i^ ^^ ^^ L* 1 1 VI 1 V fc.-* ■b' U l. Vw/ 1 1 V.' V^ 1 J 1 \.J i \^ . ^^ 


Ai1>= 




A|3|=72 A|4)==96 






A(0) = 1 5<A(1 )=62 (YES, to line 240) ... no sort 




V=0 


A(1)=62<A(2)=7 (NO, to line 230) Y=62: A(l)=7 


: A(2)=62 


V=l 1 


A(2)=7 <A(3)=72 (YES, to line 240) ... no sort 




V=l 1 


1 A(3)=72<A(4)=96 (YES, to line 240) ... no sort 




V=l 


[ Since V=l, jump to line 200 and repeat once more . 












4|2)==i2 


AI3}=72 A|4)=§6 


\(0)-^-15<A(l) '-7 (NO, to line 230) Y=15: A(0)==7 


: A(1) = 15 


v=i 1 


A( 1 )= 1 5<A(2)=-62 (YES, to line 240) . . . no sort 




V=1 1 


A(2)=62<A(3)-72 (YES, to line 240) . . . no sort 




v=i ! 


A(3)=72<A(4)=96 (YES, to line 240) ... no sort 




V=1 


Since V=^l, jump to line 200 and repeat once more. < 






,|^^^^3 Ftesults of the fourth time , . . Afi)=7 


A 111 =15 


A{2l=i2 1 


..J)=72A{4I=9e 






A(0)=7 <A(1)=15 (YES, to line 240) ... no sort 




V=0 1 


A(1)=15<A(2)-62 (YES, to line 240) ... no sort 




V=0 


A(2)=62<A(3)=72 (YES, to line 240) ... no sort 




V=0 i 


A(3)=72<A(4)=96 (YES, to line 240) ... no sort 




V=0 


Since V=0, proceed to line 260 and sorting is complete.* 






Results of the fifth time , . . A{i|=7 A(1)==15 Al2)=i2 /» 


131=72 Af 


4}=9i ! 

j 



4. 13 Line up! 



Hum 





This seemingly complex and troublesome process is 
accomplished by the computer very quickly. 
Did you understand the role of the V flag? It is very 
beneficial, isn't it? The flowchart for this sorting 
procedure is shown in the figure on the right. 



In List 18(a), the sorting sequence 
was in ascending order. To sort in 
descending order, change line 220 
to read as follows. 

220 IF A(X)>A(X + 1) 
THEN 240 

» Program to input the data 

When List 18(a) was explained, we 
presumed that the data had al- 
ready been input, but actually the 
data had not yet been input so we 
have to make a program to input 
the data. 



Start 



V = 


X = 


A(X; ACM} 


> 


Y=A(X) 
A(X)-A(X+1) 

A(X+1) = Y 

"7 - -- 1 



<= <+ ' 



X1-- + 



.•r.A 



YES 



NC 
Ri^t Jin 
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WHikiivB Data input subroutine 

:> 100 FOR X=0 TO 4 

puts 110 INPUT "DATA^^-.ACX) 

120 NEXT X 

Return .130 RETURN 



Here^s a program 
to display the 
final results. 



This program is also considered to be a subroutine, so 

there is a RETU RN command on line 1 30. 

There are no particularly difficult statements on the 

other lines, are there? 

This program is for requesting input of the five data 

elements from A(0) through A(4). 

• Subroutine to display the results 

We have input the data and sorted it. Now we have to 
display the final results. 

This program is also considered a subroutine. The 
program is as follows. 



OK! 




Dspiay the 



IfflilJH Display subroutine 
• 300 FOR X=0 TO 4 
310 PRINT X ; ••:" ; A(X) 
320 NEXT X 
330 RETURN 



• Main routine 

So far, in List (a) through List (c), we made separate 

programs as subroutines. 

However, these programs were simply executed in 

ascending line number sequence and there was no 

destination line number for the RETURN command. 



4. 13 Line up! 





Subroutine 



Therefore, a main routine program is necessary to 
designate the subroutine return or to indicate which 
subroutine to go to from the main routine. 



Main routine 

50 GOSUB 100 -t 

60 GOSUB 200 -t 

70 GOSUB 300 .[ 

80 END 



o data mput subroutine 
o sort sulDroutine 
o rjisplay subroutine 



Programs 18(a) through 18(d) input the five data 
elements, sort them and display the results. However, 
if data is written in and the program is executed a 
number of times, the previous data will remain and the 
numerical values may change. In order to correct this 
situation, variables A(0) through A(4) must be initially 
cleared. 



Finally, the 
routine. 




BSIEB 

10 PRINT "SORT" 

20 FOR X=0 TO 4 

30 A(X)=0 

40 NEXT X 



Clears variables 
! A(0) through A!4) 
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Now the program is complete. 

Try inputting several different groups of data with five 

numerical values each. 

If you would like to input and sort more data, simply 

change the "4" of the portion in each subroutine 

which reads "FOR X =0 TO 4" to correspond to the 

number of data elements you want. 

The sort program discussed here is not suitable when 

the number of data is more than 100 elements because 

it takes a lot of time to run. 

However, when there are not too many data elements, 

it is a good method to use. 



„ ;„ ascendinS 





Note _ 

Display of small letters or symbols 

BASIC is written using English capital letters. 

However, the PC-4 has a function which allows characters, symbols or 

small English letters to be freely used in the contents of character variables 

in PRINT statements. 

To use this special function, press iMode; : •] . "EXT" (extension) will 

appear on the upper left of the display. In this mode, if the letters A 

through Z are pressed, small letters will be displayed. In addition, in this 

mode, if A through Z are pressed after the iS Key, symbols such as Z, 

SI, ♦,4», etc. will be displayed. Try these. 

To release the EXT mode, just press Cmodej •; again. 



4.14 Sorting of names as well 



In the previous section, we performed data (number) 

sorting. 

However, it would be a problem if we could only sort 

numerical values. 

For example, suppose we would like to sort test scores. 

We would not know who had the highest score, lowest 

score, etc. 

What? Test scores again? 

You may get nervous when we talk about tests. 

However, this is just an example, so please be patient. 

To continue the discussion, the names of the students 

and the test scores would have to be sorted together to 

avoid confusion. 

Let's make a program which can sort the names as 

well. 

• Sorting of names 

The subroutine for name sorting can be made by 
slightly adding to the subroutine (List 18(a)) in the 
previous section. 

If we make the variable for inputting the names K$(X); 
the subroutine will be as follows. 

Subroutine for sorting data and names 
200 V=0 
210 FOR X=0 TO 3 

220 IF A(X)-i,A(X + 1 ) THEN 240 

230 Y=A(X) :A(X) = A(X + 1) :A(X + 1)=Y :V = 1 







.51 A K KS 



'K b i 



^WS 



240 NEXT X 
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250 IF V=1 THEN 200 
260 RETURN 

Line 235 is a statement for sorting the names. 
One line 220, if the left side is greater than the right 
side, the data will be sorted on line 230 and the names 
will be sorted on line 235. 

• Subroutine for inputting the data and names 

This subroutine can also be made by adding one line to 
the subroutine (List 18(b)) of the previous section. 




Just a s/ight 
change. 



iiaikia 

100 FOR X=( 

105 PRINT X 
K S s, X / 



TO 4 



I A ,¥ 



j rM p u ^ 



1 10 INPUT "DATA=", A(X) 
120 NEXT X 
130 RETURN 

The names can be input as a result of adding line 105. 

• Subroutine to display the results 

This subroutine can also be made by adding a portion 
to List 18(c). 

300 FOR X=0 TO 4 ^ Addition 

310 PRINT X ; ":" ; K$(X): "="; A(X) 

320 NEXT X 

330 RETURN 

(Sequence): (name)=(score) is displayed as a result of 
line 310. 
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• Main routine 

The main routine can also be made by mai<ing a slight 

addition to List 18(d)/(e). 



ISUfeEB 

10 PRINT "SORT" 

20 FOR X--0 TO 4 

30 A(X)^0 :,KS(X) 



40 NEXT X 

50 GOSUB 100 

60 GOSUB 200 

70 GOSUB 300 

80 END 



■; Null 

iditlon 

jt of names and data 
. of names and data 
i!ay of results 



On line 30, variable A(X) and character variable K$(X) 
are cleared. However, for character variables, charac- 
ters are cleared by enclosing a space in quotation 
marks (this is called "null"). 

• Let's trim it up a little. 

If we use this null, we can make a command as follows. 



65 Z$=KEY ; IF Z$^ 



THEN 65 



KEY means "the function which was input at that 
time using the keys". If no keys are pressed, nothing 
will be input for Z$, so the IF statement causes the 
program to return to line 65. Since line 65 is the same 
line number, returning results in execution being 
stopped at this line. 

For example, if this line 65 statement is added to List 
19(d), even though the execution of the sort subrou- 



Null 



/I'd het- 
i ter rt- 
> member { 
\ this too.. 




KEY function 
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tine (lines 200 through 260) is complete, the display 
subroutine (lines 300 through 330) will not be 
executed immediately and the program will wait for 
some key input. 

This is not really needed in this program. However, it 
prevents accidentally missing a display of the result. 
Next, if the following statements are added, after input 
of each set of data and name, the computer will ask if 
the input is O.K. by displaying "(Y/N)". Y means 
"Yes" and N means "No". 

55 INPUT "(Y/N)", U$ 

56 IF US="N" THEN 10 

This will help prevent the input of erroneous data and 
avoid useless results. 

Checking for erroneous key input is an important part 
of programming. 




Finally, 

program 

execution! 
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This completes the program. Let's check it by input- 
ting the following data and executing the program. 

FOX 50 

WISE 80 

FAGAN 40 

HUNTER 60 

STANLEY 70 



4.15 Character variables also have sizes. 



Character variables have a $ symbol attached to the 
variable such as A$, B$, etc. This, as you may recall, 
has been mentioned before. 

Also, remember that up to 7 characters can be input 
into one character variable. 

When the $ symbol is used alone as a character 
variable, up to 30 characters can be input. 
These were explained in the Note on page 98. Charac- 
ter variables can be used as shown below by enclosing 
the character strings in quotation marks and sub- 
stituting for A$ and B$. 

A$="FOX" 
B$="WISE" 



The reason for explaining something you already know 
is that the size of the contents of character variables 
such as A$, B$, etc. can also be compared to numerical 
variables. 

• Program to compare the size of character strings. 

If it were possible to put the names of people or 

products into character variables and sort these in 

sequence by comparing their size, this would be quite 

convenient, wouldn't it? 

Anyway, actions are more important than words, so 

let's try it out. 

Write the following program into the PC-4. 



Can tliof") 
he domy 
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10 


INPUT "DATA IS" 


AS 


20 


INPUT "DATA2S" 


BS 


30 


IF AS>BS THEN 


60 


40 


PRINT AS;'\.< ' 


; BS 


50 


GOTO 10 


Space 


60 


PRINT AS;'\ >, / 


: BS 


70 


GOTO 10 





If this program is executed, the computer will display 



DATA 1$? 

Input a name, for example, "FOX". 
Next, the following display will be. 

DATA 2$ ? 

Input "WISE". 

Then, the display will be as follows. 

FOX < WISE (In this case, "<" means "<".) 
* In the case of WISE < WISE, "<" means "=". 

Try various combinations. However, remember that 
the character string can only be a maximum of 7 
characters. 
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4.75 Character variables also have sizes 

• Character string size concept 

In numbers, the sequence runs from to 9, etc. In the 

case of letters of the alphabet from A to Z we attach 

code numbers in ascending order. 

Therefore, when we talk about comparing the size of 

the characters, we are actually talking about the size of 

the code numbers. 

Also, when the number of characters is two or more 

and the first characters in both names are identical, the 

codes of the second characters are compared L.et's use the prch 

So if we compare FOX and FAGAN, FOX > FAGAN. f"^" "^Y*" 

If we compare AB and ABC, AB < ABC. (In this case, program to'sort 

"<" means "<".) ABC. 

In this manner, when the number of characters which 

are compared do not coincide, the last character of the 

shorter character string is given the smallest value 

which is called null and then the comparison is made. 

Also, in the case of capital letters and small letters, 

remember that the capital letters have a smaller value. 

For example, Fox > FOX. 




Note 



How to use the SET function in a program (Refer to page 1 17.) 
The SET function can be used in a program. 

For example, if it is used in the following manner, the result will be 
displayed as 0.70711 with five decimal places by rounding off the 6th 
decimal place. 


10 


SET F5 


20 


X = SIN(45) 


30 


PRINT X 


40 


END 
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4. 16 Find the data I — | 



You probably know by now, from the examples given 

so far, that even though the PC-4 is small, it can store 

various numerical values and character strings. 

Also, another big feature of the PC-4 is that, even 

though the power is turned off, the contents remain 

intact. * 

That is, whenever you turn the power switch off and 

on, the programs remain. 

Using this feature, let's make a data search program. 

Searching for some required data from among the 

stored data is called "search". 

Using the previous example, let's make a program to 

call out the scores of students which were stored along 

with the names. 




"NOTE : However, the programs will be erased when replacing the batteries. 
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• Determining variables 

The first thing we need to consider is how to determine 

the variables. 

Since the PC-4 is an ultra compact computer, the 

amount of data that can be stored is limited by its size. 

The variables which can be used with the PC-4 are 

normally 26, ranging from A through Z. Additionally, as 

discussed in the Note on Page 103, even these may be 

expanded using the DEFM function to a maximum 

number of 94. 

However, if the number of variables is increased to 27 or 

more, the program storage area is reduced. This is a 

shortcoming of the PC-4 but this cannot be avoided 

due to its compact size. On the other hand, this is 

outweighed by the fact that the PC-4 is inexpensive, 

compact and that it has a splendid capability for making 

and using computer programs. 

Well, let's take a look at storing the names and scores of 

10 students. 

For this purpose, as in Section 4.14, let's use array 

variables. We will use variables A(0) through A(9) to 

input the scores and character variables K$(0) through 

K$(9) to input the names. 

At this point, you should recall the explanation of array 

variables which was made on page 99. 

Array variables A(0) through A(9) are the same as 

variables A through J, aren't they? Also, character 

variables K$(0) through K$(9) are the same as using 

variables K through T. This means we are using a total 

of 20 variables. 

Therefore, if we do not expand the variables, the 

number of remaining variables will be 6. 



Let's try to use 
26 or less variab/es 
from A through Z 
ivithoijt usirig the 
DEFM function. 
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As a result, the variables which can be used in the 
program for such things as FOR ~ NEXT number only 
6 ranging from U through Z. Please remember this. 

• Program for inputting the data 

This program can be considered to be similar to a sort 
program, but we will make a few changes. 
The concept is as follows. 

(1 ) Count U. Make it initially. 

(2) Put data into A(U) and K$(U). 

(3) Make U - U+1 and if U=10, terminate. (GOTO (6)). 

(4) Ask if data input is complete, using (Y/N). If Y, 
then terminate. (GOTO (6)). 

(5) Return to (2) and repeat. 

(6) Terminate (RETURN). 



Input program (INPUT PRO) 

200 PRINT "INPUT PRO" 

210 U=0 

220 PRINT U;":NAME";:INPUT KS(U) 

:^^jr°"'"^^^'^"''^ ^' 230 INPUT-DATA-", A(U) 

240 U=U + 1 : IF U = 10 THEN 270 

^^!f^'''^^^^ff^"'v^^^<- 250 INPUT "END.^Y/N, ,", ZS 

will ask Y/N at f;ach ; . ^^^ , 

input, inputting may ' 260 IF 7S "-"Y" THEN 9 9 (A 

be stopped at less than ^^ ' intlNZZW 

10 data. 



270 RETURN ^^^ Return to main routine 



The "ENDu.^.Y/N.^.," statement on line 250 means that 
the computer is asking if input is complete (YES) or not 
complete (NO). 

If Y is input, the program will jump to line 270. If N is 
input, the program will jump to line 220. 
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• Verification display program 

The input data can be displayed for verification. This is 
also a subroutine. 

I^HW'II Display Program (PRINT PRO) 

300 PRINT "PRINT PRO" i Sinceitb, 

repeat un 
310 FOR X=0 TO U-1 

320 PRINT X ; ":" ; K$(X); "=": A(X) 

330 NEXT X 

340 RETURN 
In this program, the number of data previously input 
determines the number of names and scores which will 
be displayed. 



Willi X=@, it wi 
'eachos U-1 



• Search program 

This subroutine compares the character strings for the 
names and, if they are the same, it displays the name 
and score. 

Search Program (SEARCH PRO) 

400 PRINT "SEARCH PRO" 

410 V=0 

420 INPUT "NAME=", Y$ 

430 IF Y$ i KS(V) THEN 450 

440 PRINT K$(V); ":"; A(V): GOTO 470 

450 V=V + 1 

460 IF V<U THEN 430 

470 RETURN 

In this program, the names are compared on line 430 
and, if they do not coincide, the comparison will be 
repeated according to U, which is the number of input 
data. If the name is still not found, the program goes to 
line 470 and returns to the main routine and terminates. 
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In this case, you will only know that the program was 
terminated and will not know why. For this, we add line 
465 as below. 

465 PRINT "NOT FOUND/" 
This will explain that the program was terminated 
because the input name could not be located. 
So far, we have made three subroutines for data input, 
display and search. As was explained when discussing 
the sort program, it is now necessary to make a main 
program to operate these subroutines. 

• Main routine for data input, display and search 

Let's consider the work flow for this program. The first 
task is inputting the names and scores. The next task is 
the display of all input data. The final task is to input 
the name and display the student's score as required. 
However, these three tasks must be performed sepa- 
rately. For example, when inputting and displaying data 
for confirmation, when displaying all of the data to see 
what data has been input and when only performing 
search. 
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4.16 Find the data! - 1 

Therefore, it is necessary to be able to select the 

required task (subroutine). 

In order to be able to select one of these, we will assign 

the following. 

"I" for "INPUT PRO" -> Data input 

"P" for "PRINT PRO" ^ Display 

"S" for "SEARCH PRO" -^ Search 

This kind of program is called a "menu program". The 

word "menu" here is similar to a restaurant menu. 



10 INPUT "(l/P/S)". WS 

20 IF W$="l" THEN 60 SelKtion of data input 

30 IF WS="P"THEN 70 Selection of data display 

40 IF W$-="S"THEN 1 10 Seleciio.. of search 

50 GOTO 10 

60 GOSUB 200 

70 GOSUB 300 

80 INPUT "END-, Y/Nv ,", ZS 

90 IF ZS i "Y" THEN 60 

100 END 

110 GOSUB 400 To Sfxjrcf, program 

120 END 



H ot\-k^\ 


■ WviVA L F' or 


S 


iS \n 


f)ijt, rel 


urfvs to bogi 


ru'i 






(ifUXH input [. 




(jUlf 



f cIcPa iripcit is correct, ir 
rjt Y and terfTiiriate. 



This completes the entire program. 
Write Lists 20(a) through (d) into the PC-4. The pro- 
grams are getting longer and more difficult but try your 
best anyway. 
After write-in is complete, let's execute the program. 



Ii3^: 
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First, input the data 
and store thern in 
the PC>4. 



o»cU 




• Program execution — Data input and confirmation 
Let's prepare for program execution. If the program was 
written in program area P0, make sure READY PO is 
displayed, then if you press the [sliBjtEXE) Keys, the 
following will be displayed. 

(I/P/S)? 

This is the menu. 

If you press the LiJ Key then press the fEX£) Key, the 

following will be displayed. 

INPUT PRO 

This tells you that this is the beginning of the input 

program. 

Then if theixlJKcy is pressed, the following will be 

displayed. 

: NAME=- ? 

Then, if you input a name and press the ixll Key, the 
following will be displayed. 

DATA= ? 
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Then, if you input a score and press the Be) Key, the 
following will be displayed. 

END Y/N ? 

At this point, if you want to make more inputs, input 

N(NO) and press the [ExIj Key. If this is done, the 

following will be displayed and the cycle can be 

repeated. 1 : NAME= ? 

Since this program has 10 variables each for scores and 

names respectively - namely, A(0) through A(9) and 

K$(0) through K$(9) - up to 10 data groups can be 

input. 

Of course, you do not have to input 10 sets of data and 

can terminate after any number of inputs by inputting 

Y when the "END Y/N" display is made. 
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Now, for testing, let's input the following data. 

Since we will search for these later, the spelling of the 

names must be correct. 



FOX 


;)() 


WISE 


10 


VALLEY 


It! 


MATHLS 


7t) 


KELLY 


10 


JONES 


70 


HUNT 


50 


HOLMES 


1)0 


DENT 


')() 


COOK 


80 


Rerner 


nber names contain 




can be input into character variables. 

After inputting all of the above, the following will be 
displayed. 

PRINT PRO » Display program 
Make sure the input data is correct. 
Each time you press the (eXE) Key, the data will be 
displayed. Upon completion, the following will be 
displayed. 

END Y/N ? 

If a mistake has been made, input N(NO) and the 
following will be displayed. 

INPUT PRO 

This will permit input from the beginning for correction 
purposes. 

If correct, input Y(YES) and the program will ter- 
minate. 

This completes the data input and confirmation tasks. 
Next, we will proceed to the search task. 
This is used when you want to know what score FOX 
made, what score WISE made, etc. 
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• Program execution - Search task 

Press the following keys again and call out the menu. 




~' "'EXEl 

This is a search, so press the [s] Key and then press the 
ixl) Key. Then, the following will be displayed. 

SEARCH PRO 

This tells you that this is the beginning of the search 

program. 

At this point, if you press the (EXE] Key, the following 

will be displayed. 

NAME= ? 

This is a request to input the name. In other word, the 

computer is asking you, "Whose score do you want to 

know?" 

At this point, if you input a name, for example, 

HOLIV1ES, and press ixlj , the following will be 

displayed as if by magic. 

HOLMES : 60 

Try this by inputting several of the names you input 

previously. 

The PC-4will compare the currently input name with the 

previously input names and search for it. 

Suppose you input a name which is not contained in the 

data. For example, input FOY. 

Then the following will be displayed. 

NOT FOUND / 

This tells you that such a name could not be located. 
This program concept has many practical uses. 
Since the PC-4 is very compact, it can be carried in your 
pocket. For example, you can input the telephone num- 
bers of your friends. 
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The program discussion in the previous section was a bit 
long. Are you tired? Take a rest before proceeding. 

In the previous section, we made a search program to 
display the names and scores of students when the 
names were input. 

Now let's make a program to display the names and 
scores of the students whose scores are higher than the 
input score. 



• Program to search for names using scores 



The program concept is shown in 
the flowchart on the right. 
At this time, we will make a pro- 
gram which is different from the 
program in the previous section. 

500 PRINT"MARKv^PRO" 

510 1NPUT"MARK=", X 

520 FOR V=0 TO U-'l 

530 IF X>A(V)THEN 550 

540 PRINT K$(V);"=";A(V) 

550 NEXT V 

560 END 

The MARK PRO on line 500 means 
that this is a score program. 



Start 
Ihput the sc-jri" fcr X. 



' '-^ \' -- L^ "0 ''J-1 ,i 




i 

<^X>A(vT> '*-" 
JYES 






Print the score 
and the narne. 







En 1 
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On line 520, the FOR - NEXT command repeats the 
comparisons up to the number of data which was input 
in the previous section. On line 530, the input score is 
compared with each student's score and if X is greater 
than A(V), another comparison is made. If X is equal to 
or less than A(V), a display is made using line 540. 
If the IF statement on line 530 is changed as follows, 
various displays can be made. 



Display scores which are equal to or greater than X IF X>A(V) THEN550 

Display scores which are greater than X IF X>A(V) THEN550 

Display scores which are equal to or less than X IF X<A(V) THEN550 

Display scores which are less than X IF X^;A(V) THEN550 

Display scores which are equal to X IF X ■ A(V) THEN550 

Display scores which are unequal to X IF X A(V) THEN550 




At this time, it should be mentioned that it is very 
important to insure that the symbols such as >, >,<,<, 
^ and = are used correctly. This is because the program 
flow is opposite to the meaning of these symbols. 

• Program write-in and execution 

Now, select a line 530 format to correspond to your 
desired operation and write List 21 into the PC-4. How- 
ever, write it into a program area which is different from 
the program area used for the program in the previous 
section. 

If you write this program in the same program area as 
the previous one. List 21 cannot be executed without 
executing List 20. 

After writing, let's execute the program. 
For example, suppose List 20 is written in P0 and List 
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21 is written in PI. Call out the PI program and t^xecute 

it. 

If we r^o this, the following will be displayed. 

MARK PRO 

This tells us that this is a program to display the names 

using the scores. 

Next, if (EXEj is pressed, the following will be displayed. 

M A R K = ? 

This is a display which asks, "What is the score?" 
Suppose 50 is input. If line 530 from List 21 is written 
into the program, names and scores of those students 
whose scores are 50 or greater will be displayed one 
after another as follows. 

50 (EXg FOX = 50 

iX§ MATHIS =70 

lEX| JONES =70 

jEXi HUNT=50 

ili HOLMES =60 

f|X| DENT =60 

[EXg COOK =80 

In this manner, the data which was input in P0 can also 
be used for the PI program. 
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• Call out List 21 using the menu 

The previous program was written in the PI program 
area separately from List 20. Let's use the List 20 
program menu to make it possible to call out List 21. 
For this purpose, let's make List 21 into a subroutine as 
follows. 



500 PRINT "MARK PRO" 

510 INPUT "MARK=", X 

520 FOR V=0 TO U~l 

530 IF X > A(V)THEN 550 

540 PRINT KS(V): "=": A(V) 

550 NEXT V 

560 R EI T U F' N 

The only difference between Lists 21 and 22 is that a 
RETURN statement has been added using line 560. This 
makes List 21 a subroutine. 

Then, in order to call out this subroutine, the main 
routine of List 20 (d) must be changed as follows. 



10 INPUT "(l/P/S/M)", W$ 

20 IF WS="I" THEN 60 

30 IF WS="P" THEN 70 

40 IF WS="S" THEN 1 10 

45 IF WS="M" THEN 

50 GOTO 10 

60 GOSUB 200 

70 GOSUB 300 
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80 INPUT "ENDv_^Y/N.^^", ZS 

90 IF ZS ' "Y" THEN 60 

100 END 

110 GOSUB 400 

120 END 

1 30 G S U B - 1 Ft: the P 1 firograiri ;)reu 

1 40 END 

Only the statements written in blue have been added to 

this program. "M" was used to represent MARK 

(Score). 

if the statement on line 45 is applicable, the program 

will jump to line 1 30 and execute GOSUB #1 . 

The GOSUB #1 on line 130 means "jump to the PI 

program area", if list 22 is written in the P2 program 

area, make this #2 instead of #1 . 

This is used similar to GOTO #1 and permits jumping to 

the beginning of another program area. 



if we compose a single program which combines data 

input, display, search using names, search using scores 

and this main routine, we will have made a very long 

program. 

However, making the program up a segment at a time is 

easier than trying to compose the whole program at one 

time. 

Then later, the segments can simply be linked together. 

This is a useful technique for making programs. 
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4. 18 Roulette is also useful for mathematks i 



The computer patiently performs simple, repetitious 

tasks that humans find tiring. It has already been 

explained several times that this is one of the greatest 

features of a computer. 

We are fortunate to have the PC-4 to perform these 

tasks. 



,^-~, • "The Monte Carlo Method" 

/I'm poor \ Ki I , , , , . 

)atma- j Now lets make a program to obtain n usmg the PC-4. 

Stfaf" ) 5'"'=^ ^^^ PC"4 has a n Key, the value can be obtained 

immediately by pressing the following Keys. 

The display will read 3.141592654. 

However, think of this as a kind of game in which 

random numbers (RAN#) play the main role. 

Let's call the game "The Monte Carlo Method". This is a 

game for obtaining it using probability calculation. 




First, let's consider a square whose sides measure 2, 
such as the one shown in the figure on the next page. 
(This could be two of anything, for example, 2 meters, 
2 centimeters, etc.) 

Then, draw a circle inside the square which touches all 
four sides. In this manner, the diameter of the circle will 
be 2 and the radius will be 1 . 
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4.18 Roulette is also useful for mathematics! 




Next, let's throw small rocks randomly inside the area 

of the square. 

If we do this, the rocks will hit points inside the square. 

However, the ratio of the number of rocks which fall 

inside the circle to the total number of rocks which 

were thrown will be the same probability as the ratio of 

the area of the circle to the area of the square. 

In other words, the areas of the square and the circle are 

as follows. 

Area of the square Si =2x2 = 4 

Area of the circle S2 = rr x 1 ^ = ff 

The ratio is as follows. 

S2:Si = 7r:4 
Do you follow up to this point? The person throwing 
the stones should not be someone with good control. 
A person with no control should throw a lot of rocks 
into the square without caring where they fall. 
Let's assume that this kind of person throws 40,000 
rocks. If so, the formula to obtain the number of rocks 
which fall inside the circle is composed as follows. 

40,000 X (7r/4) = 31,400 
So we can predict that approximately 31,400 rocks will 
fall inside the circle. 
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Taking the opposite approach, if you throw N number 
of rocks and M number of rocks fail inside the circle, 
the formula will be as follows. 

N X (7r/4) = M -^ TT = 4 X M/N 

However, 4 x M/N won't always be the value of tt 
(3.141592654). Since N number of rocks fall at ran- 
dom, it is not strange that the actual result will not al- 
ways coincide with the predicted value. 
Therefore, we shall make use of a value which may not 
be 7T but is close to tt. (This is called the "approximate 
value".) We will call this value "P". We can make a 
formula as follows. 

p=f 0) 

Now we will proceed to the main problem. 
What we will attempt to do is to use the PC -4 to 
count how many of the N number of rocks thrown at 
random will fall inside the circle. Then we will substi- 
tute that number for M and obtain the value of P using 
formula (1 ). 

It may seem like useless repetition but obtaining this 
value of P is an experiment to obtain the value of tt. 
(This is called "simulation".) 

By the way, throwing rocks at random is one of the 
special capabilities of the computer. Simply generate 
random numbers as mentioned in a previous example. 
Random numbers are similar to gambling where the 
outcome cannot be predicted. 

We call simulation using random numbers "The Monte 
Carlo Method". As you may know, Monte Carlo is a 
place that is noted for gambling. 
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• The algorithm which obtains the value f or P ( -. tt ) 

First, we have to count the number of rocl<s that fall 

inside the circle. For this purpose, we have to determine 

whether or not they fell inside the circle. If you 

understand the concept, the program to obtain P can be 

made right away. 

Now, take a look at the figure below. 

Taking the lower left corner of the square as the origin 

point in an X, Y graph, if we think of the horizontal line 

as the X axis and the vertical line as the Y axis, each 

point inside of the square can be expressed using a set of 

X, Y coordinates. 

For example, the four corners of the square can be 

expressed as (0,0), (2,0), (2,2) and (0,2) and the center 

of the circle can be expressed as (1 ,1 ). 

So, let's generate two random numbers for X and Y. 

However, these random numbers must be numbers 

which fall inside the square. Therefore, the following 

conditions are necessary. 

0<X<2 0<Y<2 

For example, when X = 1 .4 and Y = 1 .3, if the length of 
a line (R) drawn from the center of the circle (1,1) to 
the point formed by these coordinates (1.4, 1.3) is 
shorter than 1 (the radius of the circle), the point will 
be inside the circle, if R is greater than 1, the point will 
be outside the circle. 



(0,2) 



^ 



(0,0) 





1 \ 


I (1,1) 


v. 


y 



(22) 



To compose a 
program proce- 
dure or calcula- 
tion method is 
called an "aigo- 
lithm". 



fi'd bet^K 
iter re- j 
{member) 



\thls too.J 




X 

■(2,0) 
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This is the 
Pythagorm 
tiieorernl 



famous 
■m 




This length R can be obtained using the famous 
Pythagorean theorem. 

The distance of the coordinates from the center of the 
circle along the X axis is 1.4 — 1 = 0.4 and the distance 
along the Y axis is 1 .3 — 1 = 0.3. Therefore the formula 
will be . . . 



In other words, since we know that R is less than 1, we 
can determine that the point is inside the circle. 
If this is expressed by a formula using the x, y 
coordinates, the formula will be as follows. 



R= v4x-T)^ +(y-i)^ 

Furthermore, if x -1 = X (2) 

and y - 1 = Y n{ 

then R = /x2 + y^ (4) 

Then, the condition for falling inside the circle will be as 
follows. 

R<'l (5) 

Now we know the algorithm which determines whether 
a point is inside or outside the circle. The other 
approach is not so difficult if we use the programming 
technique which was mentioned previously. 
We will now show the program list to obtain P and then 
take a more detailed look. 
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10 GOTO 200 

100 M=0 

1 10 FOR = 1 TO N 

From formula (2) --^1 20 X=2*RAN#— 1 ; •• Random number is doubled 

■■•••'■ to obtain a random number 

From formula (3) 130 Y=2*RANit— 1 between and 2„ 

From formula (41 1 40 R =S0 R (X * X +Y * Y ) [heaSn'°'" the center ■ 

From formula 151 ■••■1 50 IF R ' '> 1 THEN 170 ■.^••. D'o'«f ''"'"'•« if the point Is 

inside or outsicfe ttie circlr 

160 M=M+1 Counts if R< 1, 

170 NEXT C 

From formuia (1) ••■••1 80 P =4 *M N 

190 RETURN 

200 PRINT"SiMULATION PI" 

210 INPUT "N=", N 

220 GOSUB 100 

230 SET F4 

240 PRINT "PI=";P 

250 GOTO 200 



Line numbers 100 through 190 are the subroutine of 

"The Monte Carlo Method" program. 

Line 1 and lines 200 through 250 are the main routine 

to operate the subroutine and display. 

In the subroutine, formulas (1) through (5) which were 

obtained on the previous page are used just as they are. 

Also, line 230 is a SET to display four decimal 

positions. Write this list into the PC-4, 
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If you have time, 
try t'his by putting 
iO,000 into IV. 
This may tal(e 
atiout 20 minutes. 



• Program execution 

Well, let's execute the program. 

First, input RUN and press JEXE! . The following will be 

displayed. 

SIMULATION Pi 



Then, press lIxE] again and the following will be 
displayed. 

N=? 

The more random generations used, the greater the 
probability that the value of Pi will be close to it. 
If 1000 is input for N, after two or three minutes, the 
display will show. 

Pi=3.1200 

Inputting 1000 for N each of five times, the following 
results were obtained. 



Numbi'i 
1)1 limes 



1 


3.1200 


2 


3.0600 


3 


3.1200 


4 


3.1400 


S 


3.1660 
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4. 19 Let's use the PC'4 to play 

the "paper-silssors-rock" game. 



We are almost to the end of the BASIC Beginner's 
Manual. Since you have now learned the main commands 
which are used in PC-4 BASIC, let's conclude by playing 

a game. 

• Technique using random numbers 

Computer games are all based on random numbers. 

(This was explained several times before.) 

Suppose we play the "paper-scissors-rock" game with 

the PC-4. Since this game is composed of three words 

(or symbols), "paper", "scissors" and "rock", let's treat 

them as numerical values, namely, "0", "1" and "2" 

respectively. 

Then the computer's task is to generate these three 

numbers in random sequence. 

The generation of 0, 1 and 2 is performed as follows. 




^^^o>-)) 



X= INT(3*RAN#) 



:)r l> 



Why do we need to multiply by 3? This is a technique 
when using random numbers. 

The relationship for multiplying the random number by 
3 and obtaining the integer part is explained as follows. 
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R A N = 



().(;MMH)IJ(MI()H 
1 

o.3;i:i3;i:i;i-i-i 

. (if j(i«jl)6()(i7 
I 

(). 99' '":'''' till) 



Tunes 3 



D.OCKMHJdOCMt 



(K)0()(Minu2 

I ^ 
99999H9y9 
OOOOOoiK)! 



2 . 999999997 





1 

1 
2 



In this manner, values of 0, 1 and 2 are generated with a 

probability of 1/3. 

Also, in the "electronic dice" game on page 113, we 

output numerical values from I through 6 using the 

following. 




X=INT(10*RAN#) + 1 
IFX>6 THEN 200 



Statement to disre- 
cprci numbers above 
6. 



However, numerical values from 1 through 6 can be 
obtained using only one line as follows. 

X=INT(6*RAN#) + 1 

Why do we have to multiply by 6 and add 1? Please 
study this and answer the question by yourself. 



• The algorithm for the "paper-scissors-rock" game 

The objective is what kind of "paper-scissors-rock" 

game should be made. 

At this point, we will simply display the result each time 

the game is played. 

In order to do this, we must determine the rules. 
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4. 19 Let's use the PC-4 to play the "paper-scissors-rock" game. 

The algorithm (program concept) is shown below. 

(1) N = 0: M = 

N: Number of times the PC-4 wins. 
M: Number of times you win. 

(2) Input your selection into X. 

= paper 

1 = scissors 

2 = rock 

(3) Input the PC-4 selection into Y. 



(4) Compare X and Y. 
When X = Y, tie 
When X = and Y = 1 , you lose. 

Y = 2, you win. 
When X = 1 and Y = 0, you win. 

Y = 2, you lose. 
When X = 2 and Y = 0, you lose. 

Y = 1, you win. 
When you win, M = M + 1 
When the PC-4 wins, N = N + 1 



lHju ' 


A 


: TIE 1 WIN LOSE 


1 LOSE 


I If. win! 


2 WIN 


i^TIE 



(5) Return to (2). 

If you try to make the game more complicated, you can 
make it more interesting. However, we will make a 
program with the basic portion of the algorithm only. 
Later, you can make various modifications to this 
program. 

• Program for the "paper-scissors-rock" game 

10 N=0 : M=0 
100 PRINT "PAPER-SCISSORS^ROCK" 
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110 PRINT "YOUR SELECTION" 

120 INPUT "0 : PAPER , 1 : SCISSORS 

2 : ROCK", X 

130 IF X<0 THEN 1 10 

140 IF X>2 THEN 110 

150 Y=INT(3*RAN::) 

200 IF X = Y THEN 300 

210 IF X = THEN 400 

220 IF X=1 THEN 500 

230 IF X = 2 THEN 600 

300 PRINT "TIE" : GOTO 110 

400 IF Y=1 THEN 750 LOSE 

410 IF Y = 2 THEN 700 WiN 

500 IF Y = THEN 700 WIN 

510 IF Y = 2 THEN 750 LOSE 

600 IF Y = THEN 750 LOSE 

610 IF Y=1 THEN 700 'WIN 

700 PRINT "YOU WIN":M=M + 1 

710 GOTO 1 10 

750 PRINT "YOU L0SE":N=N + 1 

760 GOTO 1 10 
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4. 19 Let's use the PC-4 to play the "paper-scissors-rock" game. 



In this program, since the number of wins and losses are 

counted on lines 700 and 750, the total number of 

trials, for example, 100 times, can be computed. 

Then, the number of times you won or lost can be 

displayed. 

We will leave it up to you as to how to make this kind 

of program. 



This completes the beginner's guide to BASIC. 
Those who have even roughly mastered some of the uses 
of BASIC up to this point can become more skilled by 
constant practice. 

We have stated previously that with computers, doing is 
better than just reading. To become more skilled at 
programming, you should make many more programs 
by yourself. Then, as shown in Chapter 5, you should 
refer often to programs made by others. By the way, we 
might mention again that to be able to use full-fledged 
BASIC with such a compact computer as the PC-4 is 
truly amazing. 

As was stated in the beginning, the BASIC language has 
many dialects, each being slightly different. 
Therefore, there is never 100% compatibility between 
two different systems that use BASIC. 
However, if you understand the programming concepts 
used here, it should be easy to become accustomed to 
other dialects of BASIC. 

In addition, it will become easier to use larger personal 
computers. So use the PC-4 as a starting point to be- 
come skilled at programming in BASIC. 
Not all of the functions of the PC-4 were explained in 
the previous sections. For example, the PC-4 also has 
the capability of increasing its RAM size by adding a 
RAM Expansion Pack, and also to receive and send da- 
ta through a taperecorder interface into magnetic tape. 
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In addition, the BASIC grammar of the PC-4 has more 
functions than have been stated here. The majority of 
these will be explained in the Instruction Manual, so 
please refer to it. 

These should be easy to understand for those who have 
already read up to this point. 
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Chapter 5 



Program Library 




Chapters Program Library 



I Cassette tape 
i recording plan 

I <CT-TIME> 

I Method ro fully record 

\, on a casscrre rape. 

Preparation prior to program input. 



ltv5DEl Q] CLEARAlEXEl 




pg 



18 


VRC 






28 


PRINT 
:SET N 




: HE- 


30 


INPUT 
8TH%H 


^TflPE 


LEN 


m 


T-1 






58 


PRINT 


'HO:'- 


7 

1 


68 


INPUT 


"TIHE: 


H.S 



--r f—j". 



78 C=CtIHT 8 
30 D=D+FRflC B/.b 
98 IF R^C+0 THEN 2 
89 

188 E=C+D 

118 1=1+1 

128 aoTo'se 

280 PRINT "FULL NO. 

B • T i 

r i~i 

218 F=INT (R-E)+FRh 



220 SET 

238 PRINT F;80T0 18 



Total 1 82 steps 



Memory conlenls 


A 


Tape length (minutes) 


B 


Length of 1 selection 
{minutes, seconds) 


C 


Accumulation of minutes i 
portion 


D 


Accumulation to convert 
seconds into minutes 


E 
F 

I 


Accumulated time for 
each selection (minutes) 

Remaining time 
(minutes, seconds) 


1 


Selection number counter 
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This is a program which obtains the remaining time and 
number of selections which can be recorded on one side 
of a cassette tape. First, input the length of one side of the 
tape in minutes. Next, input the minutes and seconds for 
each selection. At this time, AA(minutes)and BB(seconds) 
are input as AAQ BB. 

If the total selection time exceeds the length of one side 
of the tape, the program terminates and displays the total 
number of selections which can be recorded along with the 
remaining time. 

46-minute tape (23 minutes on one side) 

A . 1 3 : 36 



2 


4 


: 56 


3 


3 


: 30 


4 


2 


: 59 


5 


4 


: 00 



.1 


9 


: 30 


2 


3 


: 15 


3 


5 


: 10 


4 


6 


: 20 



1 : 51 



The problem is how to effectively edit one tape. 



Step ' Key operation 



iMODEi [0 



m 

(EXE) 



23 m 

[EXE] 



3.36 



Display 



CT-TIME 

TAPE LENGTH? 

N0:1 

TIME :m.s ? 

N0:2 



After repeating from step 4, at No. 7, FULL NO. 6 will 
be displayed. Press [EXE] and 1.29 will be displayed. This 
means that the selections from A.I to B.I can be input 
and the time remaining will be 1 minute, 29 seconds. 
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* Vertical and horizontal 
i total 

II (CROSS TOTAL) 

t . 

III This program is useful for a variety 

d 

; of fields. We no longer need totals 
* tables. 



Preparation prior to program input 

iMODEJQ] CLEARA IXE) 
1) cS") 40 iXE] 

?8 

1 vflc 

2 PRINT 'CROSS TO 
TflL': INPUT 'X-I 
TEH NO. %R:IF 
B>58 THEN 2 

3 B=H+1 

4 FOR D=i TO R 

''?D;: IMPUTE 
b C=C+E: F-F+F; S( [) 

;C:C=8:80Tn 3 



f: i 




3 ppjv^j !:yi-ii.p.«) 

_ ii "• ,•■ Tv ■■. I a .-' ii . "■ . a 



■^ NtSI I' 

5 PRINT 'QRflHD 



Total 541 steps 

Memory contents • 

A Number of X (horizontal) 
items 

B Y (line) number counter 
C Horizontal total 



S=RHD(8(D)/i 



[) Horizontal total control 
variable 

E Input data 
F Grand total 
G Composite ratio 
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First, determine how many horizontal axes (X) are re- 
quired, if you input the numbers which correspond to the 
vertical items (Y), the Y line subtotals will be displayed 
using the designated X numbers. After completing the 
required number of vertical axis lines, each time you press 
the ExE) Key, the X axis subtotals and percentages will be 
displayed one after another. Therefore, the X axis repre- 
sents the items for which the composite ratio is required. 
P0 : Total of respective horizontal items: 
memory G(1) to G(59). Up to 59 items 
are permitted for X to display the hori- 
zontal item subtotals 

Respective totals display and composite 
ratio display 



PI 





X, 


X^ 


X;, 


X,, 


Xf, 


Total 


Y, 


23 


26 


2 


50 


32 


133 


Y, 


19 


46 


11 


19 


10 


105 


Y, 


79 


54 


22 


30 


86 


271 


Y,, 


35 


11 


15 


12 


5 


78 


Y:, 


19 


11 


39 


20 


21 


110 


Total 


175 


148 


89 


131 


154 


697 


Compo- 
site ratio 

{%) 


25 


21 


13 


19 


22 





Data input 



Step Kt'V i-nc; (ii i.v, 

iMODEj ;«: 

' liSJ tn 

2 iXE) 

3 (Ex.) 5 (EXE) 



(Ex.) 23 (EXl) 

26 ixEl 







D:< 


;iiav 




CROSS 


TOTAL 


X^ 


TEM 


NO. 


1 

? 


Y1 


-XI ? 






Y1 


-X2 ? 






Y1 


-X3 ? 
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Step ' Key t)[)eratiun Dis['ilay 

(After inputting Y1-X5| Y1=-133 
6 [EXi , Y2-X1 ? 

Keep repeating through Y5-X5 

To see the vertical axis total and its ratio after inputting 
all data. 



Vertical 
axis total 
and com- 
posite ratio 



Step 


Key operation 


Display 


1 


iVi 


X( 1) = 


2 


iXE) 


175( 25%) 




3 


EXEl X( 2) = 

Hereafter, keep repeating steps 2 and 3 
"GRAND T. =" will be displayed. 


and finally, 
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I Sihedwier 

I <SCHEDULER> 

* Let's perform schedule management 

f using a machine. It's kind of like 

t 

I science fiction, isn't it ? 



Preparation prior to program input 

[MODE] [T] CLEAR A lE)^ 



tej (IB 21 lEXEj 

?9 1 60SUB t4:C=5 

2 FOR B=8 TO 21 

3 IF IMT i)(B)=fl;P 
RIHT DCB),Z$(B) 

4 NEXT B5 60T0 C 

5 PRINT 'HO SCH." 
5 60TO 1 

^^' I 60SUB 15 

2 FOR B=fl in 22 

3 IF B>2i;PRIHT ' 
!1EM0 0VF'';6OT0 1 

4 IF D(B)=§:0(B)= 
ft; GOTO 6 

5 NEXT B 

b INPUT ^SCH.: % 

ZI(B):60Tn 1 

1 PRIHT 'SCHJ%Z 
*(e),''nEL. OR H 



po 



2 INPUT 'D OR H ' 
OTO #! 




3T 



P4 



pt; 



4 FOR B=C+1 TO 21 

5 IF D(B)=i THEH 



6 NEXT 8 

7 IF B=l THEN 9 

C)=Z$(B-i) 
9 D(8-i)=M:60T0 I 
9 

1 PRINT ^SCHEDULE 

R';SET F4 

2 VftC 

3 8QT0 #! 

1 INPUT 'DflTF \H 

'RETURN 
1 GOSUB t4:IHPUT 

^TiHE %m=m 

/18t4sRETURH 
Total 544 steps 





Memory contents 


A 


DATE input/+TIME | 


B 


TIME input 


C 


Readout of DEtl. Or NOT anci 
switching pointer for SCH. 
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Memory contents 




D 

Y 


D$(0) 
D$(21) 


Beginning of DATE table. 
DATE table uses 22 
variables from D$ (0) 
through D$ (21) = Y$. 1 
variable per item. 


z 


Z$(0) 
Z$(21) 


Beginning of SCHEDULE 
table. SCHEDULE table 
uses 22 variables from 
Z$ (0) = Z$ through Z$ 
(21). 1 variable per item. 



By inputting month and day, you can list a maximum of 
22 schedule items. The PC-4 will display DATE? TIME? 
SCH.?. Make the desired inputs. When referring to the 
schedule, if you input the desired month and day, the 
entire schedule for that day will be displayed. You can 
make additions and deletions freely. P0 through P3 are 
lined up in file deletion risk sequence. 



P0 : Reference. If you input the date, the schedule for 
that day will be searched and displayed in sequence. 
If there is no further schedule, the program returns 
to the beginning. If there is no schedule, "NO SCH." 
will be displayed. 

PI : Addition. Corresponding to the displayed request, 
input the date, time and schedule item. For input, 
line up the characters and press Iexe] . 

P2 : Deletion. To delete a particular item, first locate the 
item using P0 and when that schedule is displayed, 
switch to P2. The PC-4 will ask you whether you 
want to delete or not. 

P3 : New list. Input at "?" indicator. 

• If listing of more than 22 items is attempted, "MEM 
OVF" will be displayed. 

• If you attempt to input a schedule in excess of 7 charac- 
ters, ERR 6 will be displayed. In this case, press [ACl and 
input again. 



itep 


Key ofjeration 


Display 


1 


rMODEj [0] [o] ,3) 


SCHEDULER 


2 
3 


EXE) 


DATE ? 


(Ex,)^';L"' 615 (EXEl 


TIME ? 


4 


(ExJ'o'JIm: 1000 (EXE) 


SCH. : ? 
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ep Key operation Display 

. !(Ex.) MEETING [EXE) j DATE ? 

j Continue repeating Steps 3 through 5 and input DATE, 
__jTIMEandSCH. 



* For 5 January, input 105 and for 1:30 PM, input 1330. 

* SCH. can be a maximum of 7 characters. 



Addition 
p I 



Deletion 



Reference 
P 8 


Step 
1 
2 

3 



Key ojieration 



Disfiiay 



li3 O 

(Ex.) 615 (EXE) 
(EXEl 



(Ex.) 



DATE ? 
615.1000 



. , MEETING 

If you repeatedly press(EXE), the entire schedule for that 
day will be displayed. 



Stop Key operation 



Display 



1 
2 

3 



d m 



(Ex.) 615 (EXE) 
1830 (EXEl 



DATE ? 
TIME ? 
SCH. : ? 



(Ex.) TELiXE) DATE ? 
Repeat Steps 2 through 4 the desired number of times. 



Step 
1 

2 
3 
4 
5 
6 



7 



Key operation 

(Ex.) 615 iXE) 
(EXE) 

(s) (it 

(Ex.) (EXE) 

(EXE) 
(EXE) 



Display 



D (EXE) 



DATE 



615.183© 



TEL 



SCH. : 
TEL 

DEL. OR NOT(ls it O.K. to delete?; 
D OR N?(Use D or N to answer.) 



DATE 



(Return to P0.) 



* First, move to P0, display that item, move to P2 and input at " ? " 
indicator. DEL. means DELETE. 

• For an item other than new list, if ([S] [33) are pressed, all data 
will be cleared, so be careful. 



Chapters Program Library 



Telephone list 

<T-LIST> 

■ This is a useful' telephone list which i 

permits addition and deletion. This '' 

^1 could also be made into a price list by ' 

„ changing the names and telephone ^i 

numbers to items and prices. Other i> 

'^ similar lists can he stored. 

Preparation prior to program input 

iMOBEi m CLEARAiXE) 

EDSzi 21 gxi 

P8 2 IF fl=«;B=i4:80T 

.-i -I 

3 80SUB 19 

4 FOR %=% TO fl-l 

5 IF mm=ti THE 
H ? 

5 HEXT 8:8=14 

7 $=8$<2*B)+R$(2* 
B+1) 

8 PRINT I:G0T0 2 

Pi 3 IF Hil4 THEN 11 

4 SOSUB 19 

5 D$(fl)=C$:l='"':I 
i|pyx 'TFL-HO % 

i 

6 B=LEN(l):R$(2*fl 
+i)=R$(29) 

7 IF B>i4 THEN 11 

8 IF B>?;RI(2*ft)= 
HID(li7)5R$(2*fl 
+i)=f1ID(8):60T0 



9 R|(2*«)=HID(1) 
18 R=M+l:60T0 3 

11 PRINT 'OVF'sSOT 

n 7 

u -J 

?2 1 fl=fl-l:OI(B)=!)l( 
R) 

2 FOR C=8 TO 1 

3 R$(2*B+C)=Rf(2* 





R+C) 




4 MEKT C:80T0 18 


P3 


i PRINT -T-LIST' 




2 m 




3 RI(28)=''H0 NftRE 




':RI(29)="560T 




#1 


P9 


1 IHPUT "HflHE %C 




*: RETURN 



Total 544 steps 



Vlernory cotncnis 


\ 




Listed item counter 


B 




Loop control variable 


C 




NAME read area 


D 


D$(0) 


foHowing 14 variables are toi 
name list , 


Q 


D$(13) 




R 


R$(0) 


following 28 variables are for 
name list 


') 


( 
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If a name is input, the telephone number will be displayed. 

The total number of steps required for this program is 376. 

Since the total number of steps in the PC-4 is 544, the 

remaining 168 steps are assigned for memory. As a result, 

DEFM (define memory) is 21 and space is available to 

store the names and telephone numbers of 14 people. 

Initial input of names and numbers, referencing, addition 

and deletion is performed by keying in the name. 

By adding the memory (option), it is possible to store 

information for 50 to 55 people. 

To use, depending on the purpose, select programs P0 

through P3. 

P0 : Telephone list reference (if not listed, "NO NAME" 
will be displayed.) 

P1 : Item addition (Input "NAME" and "TEL-NO" 
alternately.) 

P2 : Deletion. Immediately after referring to the tele- 
phone number in the PI area, that item is deleted 
and the program returns to the initial point of P1 . 

P3 : Telephone list file creation. After the variables are 
cleared, program proceeds to PI. 

• Make deletions prior to making changes. 

• Perform input after " ? " is displayed. 

• When inputting telephone numbers into PI, if you ex- 
ceed 14 characters, "OVF" (overflow) will be displayed. 
Also, if you attempt to input more than 14 items, 
"OVF" will be displayed. 



Usttrii 



Siep 


Key opct ati<-!; 


Dis|>iav 


.KIODB [0] 


1 


M m 


f--LIST 


2 


(fXEj 


NAME ? 


3 


(Ex.)HOLMESlEXl 


TEL-NO ? 
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Step 


Key operation 


Display 


4 


(Ex.)06-281-6253 


NAME ? 


5 


Hereafter, input required items using procedures 3 and 4. 



Refertnc 
PI 



Step 


Key operation 


Display 




IMODEI |01 




1 


Is) cl) 


NAME ? 


2 


(Ex.) HOLMES 

EXEJ 


(Ex.) 06-281-6253 



Addition 



Step Key operation 
IMODEI [0) 



1 



BJ [1 J 



(Ex.)FOX EXEl 



;Ex.)056-714-1855 

lEXEl 



Display 



NAME ? 



TEL-NO ? 



56— 714 — 1855 
NAME? 



Deletion 
PI 

P2 



Step Key operation 



IMODEI [0] 



1 



12J [e) 



(Ex.)FOX iXEl 



eJ C2) 



Display 



NAME ? 



056-714-1855 



_ NAME ? 

The name and telephone number in step 3 are deleted 
and the program returns to P0. 



< 



Train timetable 



<TIMETABLE> 



|1 This is quite convenient when tra^ 

* veiling by train or air. You can 

avoid bothering with timetables. 

Preparation prior to input 

fMODEl Q] CLEARA EEB 



(Dcli) 25 EEB 
P8 



1 PRIHT "SEftRCr 

2 aOSUB 195 FOR 8= 

9 TO 25 Ih *=E$( 

8) THEH 5 
P. 



4 PRINT 'NO TR.Nfl 
HE'5 80TO 2 

5 INPUT 'H %D5F0 

R C=H<B) TO H(B 
■i.iwi:iP PiiiHT 

L(C) 5 80508 7 
5 HEKT C5 80TO 5 
? PRIHT £$(8)5C-H 
(B)+15' 5 ^5 SET 
F25PRINT L(C)5S 
ET H5 RETURN 



PI 



1 PRIHT ''EHTO'lft 
+15 IF ftiS. PRIHT 
"TlfE TfiB OVr 
5 SOTO 1 



1 X. 



2 H(fl)=K5 60SUB 19 
;E$(e)=$5B=fl+l 

3 IF Ki48; PRIHT ' 
TIHE TRB nVF'5 8 
OTO 3 

4 PRINT &$(fl)5K-6 

(fi)+i5''5"5lMPUT 

'H.rl M(K)5K= 
K+i5 80T0 3 

i PRIHT "TIRETfiBL 

r-rt 
J." 

2 m 

3 GOTO 11 



pq 



i INPUT ^TR.^ 

M5IF LEH(I)>7 

5I=!1ID<1,7) 
2 RETURH 

Total 542 steps 





Mcniuiv. conli-nl- 


■\ 


Name index 


B 




Control variable 


C 




Control variable 


D 




Time readout buffer 


E 

S 
G 


E$(0) 
E$(2) 


TR. NAME table 

S 


H 
K 


H^(0) 
H(3) 


Time index table 
Time index 


L 


L(0) 


Time 


S 


\ 
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Using a maximum of 3 categories and tiie names of 7 
characters or less, a total of up to 40 train schedules can be 
stored. The three categories can be called limited express, 
express and local, or you might want to use the name of 
the line. 

To call out the contents corresponding to the category 
requested, if you input the train category or line name, the 
time will be requested. Then input the time and all time 
schedules (from that input time) within that category will 
be displayed in the listed sequence. 

P2 : New listing. For a new listing, the PC-4 will ask 
you TR.NAME, so input train name, train type, line 
name, etc. as desired. Since the PC-4 will repeated- 
ly ask the time, make inputs as desired and then 
move to PI. As an example, 11:30 AM is input as 
11H30. 
PI : Train category addition. Since ENTER 2 is dis- 
played, input another line, etc. and input the time. 
If more lines or trains are desired to be input, press 
H) [T] again. 
PO : Reference. According to the request, if you input 
the desired TR.NAME, the PC-4 will ask for the 
time H. If you enter a number, the entire train 
schedule from that train on will be displayed. 



List 
P2, PI 



-• 


>^' s ■. iiit'r.i' .■■, 


D:siiav 




^pti ;ej 




1 


mB} 


TIMETABLE 


2 


[EXEl 


ENTER 1 


3 


iXE) 


TR. NAME ? 


4 


(Ex.)BULLETlEXS 


BULLET 1 : 


.5 


^ ^ 


H.M ? 




(Ex.) 8.36 EXEl 


BULLET 2 : 
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Example to 
change to 
another 
limited ex- 
press train '- 
on the Blue 
Line 



' Example to 
change to -in 
i express train 
i on the 
^ Blue Lino 



EXPRESS'S 

abbreviated 

EXP. 



Addition 
PI 



StrV! '<■■-. ■ i'.",!^ i':- 






EXE) 


H.M ? 




8,48 lEXEl 


BULLET 3 ; 


9 


(a CD 


ENTER 2 


10 


ExS 


TR. NAME ? j 


1 1 


(Ex.) DART lEXa 


DART 1 : 


12 


ixS 


H.M ? 


13 
14 
15 
16 


12.40 (EXEl 


DART 2 : 


H 133 


ENTER 3 


Exi 


TR.NAME ? 


(Ex.) EXP. lEXEl 


EXP. 1 : 


17 


lEXll 


H.M ? 


18 


(Ex.)l3.00 Exe) 


EXP.. 2 : 


19 


ixi 


H.M ? 


20 


1 14.05 (EXEl 


EXP. 3 : 



Train schedule additions cannot be made. Addition of 
train names can be performed in PI. ENTER 3 input ex- 
change can be made by pressing the following keys. 

EQDE) [AG] A=2 i^ d] (55 



Reference 
PI 



SlC; Kc V ;-r: .J.-;- ' J> bp^^iv 


'MOUL" [ei' 


1 


BJ fej 


SEARCH 


2 


ixi 


TR.NAME ? 


3 


(Ex.)BULLETiS 


H ? ( After what time? ) 


4 


8.00 lEXEl 


BULLET 1 : 


5 


EXE) 
Hereafter, continue 
be displayed one aft 


8.36 
to press(EXE)and the listed times will 
er another. 
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Co!f game 

<GOLF GAME) 

Golf with a mechanical feeling ! 
; The flight path of the ball is repre- 
sented by revolving numbers. 

• IHi Tllk ■111 ■»». TIBi ■»». ■Wt. THi, 'm Til, T» -Bli ^i,, -.HI 

Prepara tion prior to program input 

I MODE 1 Q] CLEARA |EXE] 




P9 



lEXEl 

10 8=9:N=58 

28 PRINT 'SOLF 8fiH 
E";'.60SUB t9:PR 
INT 'BEST-SCORE 
";H;:60SUB 19 

30 Q(1)=4:Q(2)=5:Q 
(3)=4:9(4)=3:Q( 
5)=4:9(6)=5'.Q(? 
)=4:Q(8)=3 

48 9(9)=4 

50 FOR H=l TO 9 

69 L=Q(H)«28-28+IN 
T (RflNt*18) 

78 PRINT H;";PflR'; 
0(H);l;"HT.80S 

08 #9:60SUB 19: 

aOSUB 19 
38 80SUB tl:6=6+i:: 

PRINT '(";C-Q<H 

)!")•: :80SUB 19 

:808UB 19 
99 NEH H:IF 8<H;M 

=8: PRINT '** eE 

:60T0 28 



108 PRINT 'SCORE=''; 

6 
Hi 6=8:60T0 28 

pi 

28 PRINT L; ' PUSH 
KEY"; 

38 IF KEY*" THEN 
38 

48 IF KEY="" THEN 
48 

45 80SUB 19 

59 PRINT L!= SHOT! 
'':;C=C+l:FOR 1= 
1 TO 1e99:IF KE 
V=" THEN 198 

S9 HEKT I . 

188 J=S6N L 

113 FOR B=l TO I:L= 
L-j: PRINT ;PRIN 
T L;:HEKT B 
128 IF L=8; RETURN 
138 SOTO 38 




o 



P9 



18 FOR 1=1 TO 188: 

HEH I 
28 PRINT 
33 RETURN 



Total 433 steps 





Memory Contents 


c 


I Par 


G 


Total par 


H 




Hole number 


1 




Counter (distance of i 
the balll ' 


J 
L 

N 




L mark 




Distance to the hole 




Best score 


R 

\ 

Z 


Q(1) 
Q(9) 


Par for each hole \ 

1 1 
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This is the same method as actual golf. There are 9 holes. 
The par for each hole and distance to the hole are dis- 
played. Try to get the ball in the hole with as few strokes 
as possible. 

For each hole, the amount over or under par will be dis- 
played. Also, after completing 9 holes, the total number 
of strokes will be displayed. The lower the number of 
strokes, the better. 

When hitting the ball, the distance is determined by the 
length of time that a numerical key is pressed. If you keep 
pressing for a long time, the ball will overshoot the hole. 
In this case, the distance to the hole will be shown as a 
minus. 



Keep pressing 
any numerical i 
key. 



Step 


Key operation 


Display 






1 


IMODEI |0| 


1 


m if) 


GOLF GAME BEST-SCORE 50 
1 ; PAR 4 69 M 
69 PUSH KEY 






(1 St hole, par 4, distance 69 m) 


2 


(Ex.) 3 


^28 




3 


- 2 




3 


(^1) 

(Display for the next hole) 




Continue repeating 


jntil 9 holes are completed. 

SCORE 48 

If the score is better than the previous 
best score, the display will be as 
follows. 

* *BEST=29* * 
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Sht game 

<SLOT GAME) 

The speed with which the 3 numbers 
ciiange gets slower and slower. This 
is the part that requires programming 
technique. 

Preparation prior to program input 

iMODEl CD CLEARA (EXi 

d &13 iEi 



5-5.:5_, 



r.)' ( ) ^ t ) 



'O 



u 



/"N ^^ 



o 



pe 



[8 ?m 






168 6=8+B*h:ST0P 

^70 pi^THT CSR 1;B*H 



I a .■• 3 I f ■ . i 



188 QOTQ 28 



D "--t T:- 



4M hUR r:=_ 
50 X=IHT (RHH#*iH) 
fig V=iHT (RflH#*18) 
78 Z=iHT (R8Hi*18) 
88 PRIHT CSR lit'' 



% rOR 0=1 Tn f;t2 
180 NEXT'd' 
119 HEX! C 
128 IF X=Y'B=B*4 

138 IF T=Z '8=8*4 
148 IF X=Z!R=8*4 



Total 225 steps 
Memorv contenls 

A Amount of bet 

G ; Total amount 

i " " 

_X j 

Y I Random number 

7 






Just like a slot machine, 3 numbers can be seen as if they 
were rotating. The rotation gets slower and slower and 
finally stops. This is the essence of the game. This is 
realized by using a double loop of a FOR ~ NEXT state- 
ment. 



Rules 

• 2 like numbers: 4 to 1 

® 3 like numbers: 64 to 1 





IJVI.'JUCJ l'^}J 




1 


U m 


SLOT GAME 


2 


[EXE] 


AMOUNT OF BET ? 


3 


(Ex.) 100 (EXE) ! Numbers change 12 times then stop 
The amount of the bet is up to you. 


4 


(Ex.) (EXEl 


^100 (-100) Amount in ( ) 
indicates amount remaining. 


5 


Repeat from step 2. 
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<JK 



: Standard deviation ^« &=S9R ca s*s h 

J and statistics 20 print 'SD(H):d= 

* <STAThO> ^;y:60T0 28 

I This covers deviation value calcula- Fb 

" tion and various related calculation ^- i^~j«R s\u~-j*b/H 

; data. This has many uses for schools 
and for quality control. 



Preparation prior to program input 

iMODEl (T) CLEAR A [EXE] 



)/{H-l}) 
29 PRINT 'SD(N-i)5 
£=';£: 6010 28 
P? 
18 INPUT "H= %H\f 
=(H-58)*E/18+H I 

I v"') lEXEl PRINT "!^=''?V:6ri 

7p( iHpiiT 'KFV IH X TO 18 

it; rKirti -s^^i-^ %X:H=H+i;S=S+ PS 

aF L$*'' THEN x:Q=y+x*x:GOTO 18 HrS/M:E=SyR ((Q 

II PRINT 'COHHENT " 28 TNPiiT 'KEY IN X 



"'=!Typ|iT '-if FY 



",X:H=lM*f X-H ) 



N 1 OR N M$ |R pPTHT ^d==!Q;hO / £+58: PRINT ^'0. 

u L- u- H iHEri JO 19 VftLUE ='?H 



TQ 



20 PRINT 'K' OhTH p? 



38 PRINT H:80T0 28 

22 PRINT "nSfiiiH OF ^t Total 512 steps 

X' IR pPINT 'M=":H;80 

23 PRINT ^'H;HO. OF rn 19 

DHTfi= 

24 PRINT ^fl:flVERft6 ^ 

25 PRINT '^mm' 28 PRINT »h=^;h:SO 

26 PRINT 'E:SD(N-1 jg 28 



A 


Memoiy Comcnli 

X 


I) 


.Sl> (n) 


E 


SD (n 1 ) 


H 


Dovi.ition value 


N 


n: Number of dat.i 


Q 


Zx^ 


s 


Zx 


X 


Input data x 


Y 


X obtained by H 
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Concerning deviation value, it has been explained in 
Chapter 4. In a given group, it is known that data is 
usually formed as a normal distribution. In this, the con- 
cept of a deviation value compensates for ungrouped 
data. The standard deviation is widely used as a measure 
in statistical work. 

This obtains the necessary calculated value in order to 
find the characteristics of the group. In addition, if the 
deviation value is given, you can find the equivalent value. 
In order to extract the various data, many windows are 
prepared from PI through P8. 

P9: Data input. Clears previous data. Since it 
repeatedly asks you KEY IN X?, after all 
data is input, specify the required program 
area. 

P0: Data input. Since previous data is not 
cleared, continuously input data. Data is X. 

PI: 2X2. Sum of square of X 

P2: 2X. SumofX 

P3: N. Number of data elements 

P4: X or 2X / N. Average 

P5: D. Standard deviation ajM (population) 

/y\' i viv ,-• V 

V N 

P6: E. Standard deviation a^j^ (sample) 
P7: H -^ X. Obtain X by inputting deviation 

value. 
P8: X -> H. Obtain deviation value by inputting 

X. 



Obtain SX^, 2X, N, X, a^ and o^^^^ for the following 
data. 



25 46 53 64 70 80 92 100 

59 67 75 78 85 
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Datr 






If you fornr-t 
the meanidg 
of the symtii'l 
make COM 
WENT YES. 



P8 



What is llie 
value for the 
deviation 
value, 53? 

'What is the 
deviation 
value for 85? 



13 
14 
15 
16 
17 



Slf|) 


Key cipetation 


Dis[)lay 


1 


[MODE) [i 




2 


,-1 


STAThO 


3 

4 


lEXEl 


COMMENT ? 


lEXEl 


KEY IN Y OR N ? 




Y tEXE) 


X :DATA (Individual data) 


5 


If Y (YES) is input, explanation of the symbol will be 
displayed by pressing |exe| . 




:SUM OF SO-X (0=2X'). S :SUM OF X. 

N : NO. OF DATA. A: AVERAGE. D:SD(N) 

E:SD(N 1) 
If N (NO) is input, the above explanations will be 
skipped by pressing (EXE| . 


6 


Exs' 


KEY IN X ? 


7 


25 lEXEl 


KEY IN X ? 


Hereafter, required data is input repeatedly. 







8 
9 


1 , 


0=66314 


y (-1 


S=894 


10 


(3 J 


N=13 


1 1 


(4 1 


A=68.76923077 


12 


iV^j 


SD(N) : = 19.28392653 



(Ex.) 



01.; I 
01 /J 

53 ExfJ 



85 EXE 



SD(N-1 ) :E= 20.0713471 

H - ? 

X- 74.7906349 

KEY IN X ? 

D . VALUE = 58.08653707 



Regression 
analysis 

j (REGRESSION ANALYSIS) 

Linear, exponential, logarithmic and 
* power regression analysis are all po- 
'; sihle. 

Preparatiqn prior to program input 




[MODE] (Tj CLEARA (EXEI 



[5] rvn lEXE] 



P8 38 a=H+B»LH F^RETU 

1 S=T/H:6=(V-S*y) RH 
/iy-S*T);H=(H-K 48 8=H*FfB: RETURN 
*T)/HrC=H5 60SyB 

Pti'SOTO h pi 

2 RETURH ' i vac 

3 SOTO 5 2 f=UIHEfffi^;p=i; 

4 RtTURH 8010 15 

5 H=EKP it CiRETUR 

H ri ^ ^^ 

h Q=y«y/H:R=(C*U+ t '^ 
HiV-§)/(7-y):pR ^ f=''E!^POHEHTIflL" 

7 INPUT "i= %FU '•■' 
F Fi8 THEH 7 

8 80SUB P*i8:PRIH 
T ^'FXPECTE!) y = 
% 8: SOTO 7 n, 

18 6=H+B*F J RETURH , uap 

29 E=£xp 1 ; ;:: 






F5 3 PRINT 'wmimi 

ON ftHflLYSIS*?-P 

t s t a > 

4 PRINT 'ROUND •; 
Htl:N=H+i: INPUT 

80SUB PM:80T0 

q 

5 RETURH 

6 T=LH Y: RETURH 

7 x=LN X: RETURH 
g v=j_|i ¥:QOTO 6 

9 T=TtK:U=U+Y:V=¥ 
+x*Y:H=ii+K*X:Z= 
7tV*Y:60T0 4 

Total 500 steps 



eOTO #5 



1 VHC 

2 $=^L06flIT!tt!IC = 

^OTO 15 



21 6=tt(B*F);6=H»6 
s RETURH 



^P0HER»:p=4i6 





'MtmofV l^««nS 




t' 


fj 


'' _ 1 


( 


1 

1 


r 


■ Xlj i lIi V 


(. 


1 \ 1 [ 1 10, 




n 




l'«) rPrtl.HTO p,"-Ur 




^t 11 1 


p 


r 




V 




S/ 


1 1 


%1 ^ 1 




2m 




v;\ " ' 




X 


I 


■' 


Z 


V , ^ 



OTO #5 



179 



Chapter 5 Program Library 



This is a method for predicting a statistical data distribu- 
tion by determining which formula is the closest fit. 
Even for data which seems at a glance to be completely 
random, if analyzed, it can be expressed as an x, y coef- 
ficient of correlation such as linear, curved, etc. This 
method is called "regression analysis". 
This program permits 4 kinds of regression analysis. 
PI: When data can be used in a linear regression 

formula 

y = a + bx 
P2: When you think the data can be used in an 

exponential regression formula 

y = a-ebx 
P3: When you think the data can be used in a 

logarithmic regression formula 

y = a + b-Inx (In: natural logarithm) 
P4: When you think the data can be used in a power 

regression formula 

y = a-xb 
P0: Output. After all data input, a, b and r^ are 

output and based on this, if you input x, the 

estimated value of y will be displayed. 



In the case 
of linear 
refression 



Analyze the relation between sales of ballpoint pens and 
those of pencils using the linear regression analysis. 



Item 


1st day 


2nd day 


3rd day 


4th day 


Ballpoint 
pen (Xi) 


14 


19 


26 


34 


Pencil (Yi) 


29 

_ 


22 


16 


9 



Step Key operation 


Display 




(MODEl (0^ 




1 


(S) Q3 


REGRESSION ANALYSIS -1 : ' 


2 


Exi 


LINEAR 


3 


EEi 


ROUND 1 
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After com- 
pletion of 
data input 
goes to P0 



30 

U 

c 

I 10 



Siep 



5 
6 



Key o|)eration 

[EXE1 
14 iXE] 
29 [EXE] 



Display 



x= ? 

y=? 



ROUND 2 
x = ? 



Continue repeating this and input data. 



9 

10 

11 

12 

13 



30 



[EXE] 
[EXE] 
[EXE] 
[EXE] 
[EXE] 



3=41.66041896 
b = -0.9746416759 
r 12=0.9880541759 
x= ? 



EXPECTED y= (Estimated value of yj 

12.42116869 



Therefore, the linear regression formula is as follows: 

y = 41.66 + ("0.974)x 

Since the correlation coeffi- 
cient (r^) is 0.988 , these 

two items are much related. 
.^..^^^ It is predicted that 12.4 pen- 

"^*> cils will be sold when 30 ball- 

10 20 30 point pens are sold. 

Ballpoint pen (x) 



Category 


Linear 
regression 


Exponential 
regression 


Logarithmic 
regression 


Power 

regression 


Program 


P 1 


p 2 


P 3 


P 4 


Regression 
formula 


/ -1 t i. , 


y =a • e "--^ 


y=a + b- !nx 


y =a-x''' 


\ 


^ t 


XI 


!nxi 


inxi 


i' 


, ! 


nyi 


yi 


Inyi 


c 


a 


na 


a 


!na 


p 


1 


2 


3 


4 i 



Chapter 5 Program Library 



Annual average 
growth rate 

<A.A.G.R.> 

Any change in annual growth such 
as various achievements, prices, etc. 




Preparation prior to program input 



MODE 



CLEARA EXE: 



(HI cSr:) EXE 



1 FRIMT "ft.ft.e.K. 

2 IHPUT nST SftLE 
3%fl."2HD SBLtS 
%B.^'DURftTION:l) 
Sy?SET Fl 

3 L=[M (e/H)/D 

4 F=EXP 1 

5 K=FtE*!HM-i98 

6 FRiHT ''RftTE=^^?R 
rr:3ET H:60T0 



Total 123 steps 
Memory Contents 



First sales 
Second sales 
Duration 

\ an' il t ti^itiltirn ' 

Result .it ,i\i'i m 
i^iuwth rate 
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'mtimrnm 



Average growth and growth rate can be used in all required 

fields. However, at this time, let's take a look at a 

comparison of product sales. 

Make the first category that you want to compare "1ST 

SALES" and make the second following that "2ND 

SALES". 

Make the period covering this "DURATION : D", and 

obtain "RATE" (annual average growth rate). 



1st Sales 


$500,000 


2nd Sales 


$870,000 


Duration (years) 


1 year 2 years 3 years 4 years 


Growth Rate (%) 


74.0 31.9 20.3 14.9 



flepiMted 
tiL're.iftt'r 



Step 


Key i)|ieratN)n 


Display 

1 


1 


MODE 




1 il ih 


A.A.G.R. 


2 


EXE' 


1ST SALES? i 


3 


500000 EXE' 


2ND SALES? 


4 


870000 EXEi 


DURATION : D ? 


5 


1 EXE 


RATE =74.0", 1 


6 


EXE 


1ST SALES? 1 


7 


500000 EXEl 


2ND SALES? \ 


8 

9 


870000 EXEi 


DURATION : D? 


2 EXEi 


RATE=3L9:''o 



Chapter 5 Program Library 



Decimal 4— ► base-n 
t 

conversion 

I <BASE CONVERTER) 

4 

Jl Performs base conversion required in 

* programming or controlling. Mutual 

i(i conversion of decimal < > base-n. 

'' Decimal numbers are OK too ! 



Preparation prior to program input 

MODE] ifl CLEAR A EXE' 



ISJ 
pa 



lEXE 



" 80SUB ty^SOSUB 
i? 

2 f=^*;V=38: INPUT 

"DECIMfiL %S:T 
= \Wi 9;ij=FKfiC S 

3 Q=INT (T/K):x=T 
-Q*e:T=y:V=¥-n 
$=H$(X)tt:IF T* 
e THEH 3 

4 IP y=y T[4Ff4 9 

p -i;y=u»R:K=lH 
T y:y=FRHC U 

5 f=$+H$(X):IF y= 
8 THEH 8 

7 NEXT M 

3 PRIHT Sr=M?" 

('■R;')'"80T0 2 
9 HEXT n 
19 PRINT 3;'=M;^ 

('?R?')°iROTO 4 



60SUB t9:60SUB 
17 

3 IHPUT M-D6 -u 

■l 

4 IP 7$=%';t=9;T 
=it$=$+7t:8rjT0 

5 SOSOB 18: IF 14=1 

THEH 3 
S $=$+/$: 60SUB t; 

)=%S:SOTO 3 
H S=S*8+x:RETURH 
a 1=1-1: s=S+Mf 

: RETURN 



ff*(p-i )=M THEH 



lEH 



?ETuRH 



IF 2$=fl$(X);i4=M 
:RETURH 
2 NEXT AipRIHT Zl 
;':ERROR';ll=i:R 
ETURH 



ri 



1 $=^8123456789ftB 
CDEF':FOR 9=1 T 
i6:R$(8-i)=?II 
0<0,i):NEXT 9 

2 RETURN ■ 

Total 532 steps 





Momoiy Co!itenIs 


A 
P 


Base-n number table i 

i 


Q 


L> ntrol variable. OuoUtnl ■ 


R 


BASE 


S 


Decimal 


T 


Integer portion ot S 


U 


Decimal portictn ot S 


V$ 


Charficler nuiT^bei' counter 


w 


Cr, 1-. ..-1.1 'i 't - I.I 


X 


Remainder 


Y 


Indirect GOKj pmntei 


z 


Cliaracter readout 

butter 
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Performs conversion between decimal and another base. 
Generally, binary and hexadecimal are representative. 
Conversion can be made to hexadecimal. Decimal numbers 
are also possible. 

P0 : D TO A 
PI : A TO 1) 

D '. Decimal 

A : Anotlier base(n£il6) 

Since the BASE is asked, make input accordingly. 
Thereafter, input according to the display. 



What is the hexadecimal for a decimal of 58.5? 
What is the decimal for a hexadecimal of 35B? 



A TO D 



Input from 
the most 
significant 
digit. 





's. ■. , <■' r 






MODE 




1 


G (i) 


D TO A 


2 


EXE 


BASE ? 


3 


16 EXE 


DECIMAL ? 


4 


58.5 EXE 


58.5 = 


5 


'EXE 


3A.8 ( 16) 


6 


C3 (171 


A TO D 


7 


lEXE 


BASE ? j 


8 


16, EXE 


1- DG ? 


9 


3 lEXEi 


3 ( 16) = 


10 


EXEI 


3 1-DG?atthenext|EXE) 


11 


5 EXE! 


35 ( 16)= 


12 


EXE 


53 1-DG? atthenext(EXEj 


13 


B EXEI 


35B ( 16)= j 


14 


lEXB 


859 
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Chapters Program Library 



Leost (ommon multiple 

and 
greatest (ommon measure 

I <LCM, GCM> 

jj Both are possible using one program 
t called a "greedy" program. 




Preparation prior to program input 



MODE 



CLEARA EXE 



y -v") ixi 



?¥■ 



12 INPUT 'KEY !H L 






LI^'L' THEN 



Id IF ij^^fi'' TUFH 

15 p=292;l=''8CH'' 
28 INPUT "R=Mi:IN 

*8=8 THEH 29 
3g r=p:[)=K:lF CiD 

THEN 58 
48 F=o:D=C:C=E 
58 E=C 

50 IF C*D THEH 89 
78 PRIHT $;^='';E:6 

OTO 20 
80 80SUB P 
99 F=2:80SUB 128: F 



180 eOSUB 120: IF F> 
IHT (SQR (M)/ 
2)*2M THEH 78 

118 F=F+2:G0T0 188 

128 MiSOSUB 158:1 
F R*8; RETURN 

138 X=D:60SUB 158:1 
F R*0; RETURN 

140 80SUB P+l:C=C/F 
:D=D/F;80T0 128 

150 &=x-IHT (X/F)»F 
: RETURN 

280 E=C*D: RETURN 

291 E=E/F: RETURN 

292 F=t; RETURN 

293 E=E*F: RETURN 



Total 362 steps 
Memory Contents 



Temporary LCM or 

^.,.,^ ^,„: GCM^ 

Indirect address point- 
er for LCM and GCM 
switching 
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This program combines least common multiple (LCM) and 
greatest common measure (GCM). The differences between 
the two processes are made into subroutines. The respec- 
tive A values and B values are obtained. 



LCM 



Ste() 


Key 


(>[)t'rati(tti 


Display 




MODE 




1 




'-"'1 i«i 


LCM. GCM 


2 


EXE 


KEY IN L OR G .' 


3 


(LCM) 


L EXE 


A= ? 


4 


(Ex.) 


35 EXE' 


B= ? 


5 


(Ex.) 


7 EXE 


LCM= 35 



GCIVl 



Ste() 


Key operatKin 


Display 




MODE 




1 


I'l (") 


LCM, GCM 


2 


EXE 


KEY IN L OR G ? 


3 


(GCM) G EXE 


A= ? 


4 


(Ex.) 35 EXE 


B= ? 


5 


(Ex.) 7 EXE 


GCM= 7 



If the numbers become greater, the calculation will take 
time. Sometimes you may have to wait anywhere from a 
few seconds to a few minutes to get the answer. 
However, even so, the PC-4 performs the calculations 
quickly. 



Chapter 5 Program Library 



Prime factorization 

<PRIME-I> 

Prime factorization is effective in simp 
lifying complicated calculations. 
Mathematics can be enjoyable! 

iiii, Tin. ••I ^T« Tik '111 'm -m, im. w,, im/m ■iit is, iii» ■•« 

Preparation prior to program input 

[KCiDE] Q] CLEAR A (EXi 

d i°rj (EXl 

pg 

18 PRINT 'PRIHE-P 

28 INPUT ''H=%Z;fi= 

Z'lF H=i theh'2 



3780 




128 PRINT 'N=';lr 
f!H:PR!HT '9u 
="'fl'.80T0 38 

130 PRINT Z;* IS PR 
THE H0.':p=28:R 
ETURN 



38 I=2:80SUB 58:1= 

31 SOTO P 
48 BOSUB 58:1=1+2: 

aOTO P 
50 M=8:B=IHT ((S9R 
a)/2)*2+l;iF I 

>B THEH^188" 
68 S=S6H (fl-IHT (H 

/n*|)-i;?l=«-3: 

S=HtItS:80T0 (? 

8+S*!8) 
70 IF H*8 THEN 128 
88 p=4g:iF li=nP=2 

§ 
■38 RETURN 

188 IF a=Z THEN 138 
118 I=ft:M=l:R=i 



Total 258 steps 



Memory Contents 


A 


Z / 1 when divisible 


B 


Upper Mmit of 1 


1 
M 


Temporary prime factor 


Exponent of same prime factor 


P 


Pointer for the destination after 
returning from subroutine 50. 


Z 


Input data 
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N: prime 
factor 

QUO: quo 
tient 



For prime factorization for some number, you must find a 
prime number which has no exact divisor other than 1 and 
the number itself, such as 2, 3, 5, 7, 1 1 , etc. 

a -=2''X3*X5''X7'' 

In the program, input data A is divided by temporary 
prime factor I and if divisible, A will be updated using A/I 
and M will be increased by 1. This is repeated until no 
longer divisible and ItM and the quotient are displayed, 
then I is updated and the same operation is repeated. 
If I exceeds >/A, Z is considered to be the prime number. 



Step 


Key 


operation 


Display 






MODE, 




1 




m 


PRIME-I 


2 


lEXEl 


A = ? 


3 


(Ex.) 


385 lEXEl 


N=5t1 


4 




lEXEl 


OUO=77 


5 


'EXEi 


N = 7 t1 


6 




lEXE 


0U0 = 11 


7 


'EXEI 


N = 11 t1 


,.._.__lJ 


lEXE 


0U0 = 1 



After the above, the following answer will be displayed. 

385==5'X7'X11' 
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Universal power 
iakulation 

<UNIVERSAL P CAL> 

Can be used for square root, cube 
root, square and cube as well as other 
power calculations. 

Preparation prior to program input 

MODE 1 CLEARA EXE! 
[S] ' v" EXE 

P8 
18 PRINT "SeUfti?E R 

00T-CBL'".E=.5 
28 60SUB t6:Pi!HT 

''SeUfiRE ROOTC; 

xr)=^,Y:60T0 2 

8 
PI 
18 PRINT "CUBE ROO 

T-CftL"5E=i/3 
28 SOSUB tt: PRINT 

"CUBE ROOTC^X? 

")=^.y;60T0 28 



r.' 



18 PRINT •'SQURE-Ca 






28 SOSUB *5:80T0 2 

e 






29 



?4 



IM 



PRINT "CUBE-€flL 

60SUB #5: SOTO 2 

i 

PRINT 'UNIV-P-C 
BL"; INPUT "EXP= 

a c 

SOSUB 15: GOTO 2 

8 



SOSOB #6: PRINT 

y I H :k 1 1 r > a _ u I u I 



RETURN 



18 INPUT "X=%xaF 

Xi8 THEN 18 
28 Y=KtE: RETURN 

Total 2riS met-m 



Ml'ITluSV l.^lliU■l1^ 


1 


Exponent 


X 


Input data 


Y 


Answer: Y = X t E 
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Using y = X' , most frequently used items such as square 
root, cube root, square and cube can be obtained 
independently. With respect to these, since exponent E is 
given in the program, by simply inputting X, Y will be 
output. Using P0 and PI, the output will be in the form 
SQUARE ROOT (X) = answer or CUBE ROOT (X) = 
answer. 



P0 
PI 
P2 
P3 
P4 



Square root 
Cube root 
Square 

Cube 






Other power calculations. First, input E. Next, if 
X is input, the answer will be given as Y = XtE. 
All input is made following the "?". 



Sqiicire root 



1 Step i Key ojicratKin ^ Display 


! 1 


MODEl 






SQUARE ROOT-CAL 


2 


lEXEl 


x=? 


3 

4 


3 iXQ 


SQUARE ROOT ( 3) = 


iXi 


1.732050808 



The answers of PI, P2 and P3 are obtained in 
the same manner as above. 



Chapters Program Library 



Simultaneous linear 
equations 



By using BASIC, even this level of 
mathematics can be enjoyable ! 



Simultaneous linear equations 
with 2 or 3 unknowns 



2 unknowns — P2 

A,x,+B,X2 = C, 



^.''^m:.'mi..-''m>,.-''mb..y 



.^■■'?fc ■■'•i/ifc, "■'^.'"«s^'^,-Wi,.-^i», ■ 



A2X,+B2X2=C2 

3 unknowns — P3 

AiX|+BiX2 + C|X3 = D| 

A2X,+B2X2 + C2X3 = D2 

A3XI + B3X2 + C3X3 = D3 



Preparation prior to program input 

mm m clear a mm 9 aosue t9:60SUB 



P2 



Pt 



1 PRIHT '^S.L.Ey'; 
-V 

2 0=8 

3 aOSUB t9:F0R H= 
1 TO V:F(l4)=H(i4 
):NEXT H:x=2:60 
SUB 9 

4 FOR H=2 TO V:J( 
^)=fl(H):NEKT W- 
IF V=2;8=H-6»C: 
80T0 7 

5 K=3:60SUB 1;F0R 
y=3 TO v:l1(y)=H 
(y):HEXT il 

S C=!1-L*D:B=I-S*C 

-m 

7 poR iii=i TO V;PR 
INT "XM^;" = ' 
;fl(l4):MEKT m:80 
jn 9 

8 FOR Y=2 TO X:60 
SUB 18*Y:HEXT Y 
: RETURN 



'J" ^[.iui\n 

20 IF H=8 THEH 22 




1 y=2:60T0 11 


21 FOR M=i TO V:fl( 


P3 




y)=H(H)-F(H):HE 




1 V=3:60T0 11 


KT « 


P8 




22 IF 8=8 THEN 24 




1 PRIHT =PITOT=8" 


23 FOR H=2 TO V:ft< 




, 'RETRY! °:U=U-i 


M)=fl<y)/B:HEXT 




; RETURN 


H: RETURN 


P9 




24 IF U=2!60SUB 18 




1 U=Utl 


:80T0 20 




2 PRIHT "ROUND* ;U 


25 RETURN 




:IHPUT '•?= %h: 


38 IF 8=8 THEH 32 




IF fl+U=l;60SUB 


31 FOR y=2 TO V:ft( 




18: SOTO 2 


M)=H(H)-J(^):NE 




3 IHPUT '8= 'S8,^ 


XT y 




C= SC:IF V=2 T 


32 IF C=8 THEH 34 




HEH 7 


33 &=D/C: RETURN 




4 IHPUT ^D= %D 


34 IF y=3:80SUB 18 




7 IF B=8; RETURH 


.■60T0 39 




3 FOR H=i TO V:fl( 


35 RETURN 




H)=H<l4)/fl:HEXT 
«: RETURN 



1 PIVOT: Changes the sequence of ROUND 

1 and ROUND 2. 

2 RETRY!: Tryagain! 
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Total 541 steps 





Memory Contents 


A 

•) 
D 


Coefficients and 
constant terms 


M 


1 D of ROUND 2 


P 


D of ROUND 3 1 


U 


Counterfor number 
of ROUNDS 


G 
H 

1 


B through D of ROUND 1 


V 


Number of unknowns 


w 

X 


Control variables 


L 




Y 


Pointer for indirect 
GOTO statement 






This is a program which performs simultaneous linear 
equations both with 2 and 3 unknowns. 
P2: Simultaneous linear equation with 2 unknowns. 
AjXj+BjX2=Ci (ROUND 1) 

Ajx, +B2X2 =C2 (ROUND 2) 

First, the PC-4 asks the values A, B and C of 
ROUND 1. 

Next, it asks the values. A, B and C of ROUND 2. 
After these are input, the results (xj, X2) will be 
displayed. 
P3: Simultaneous linear equation with 3 unknowns. 
In the same manner as above, the results (xj , X2, 
X3) will be displayed after the values A through D 
of ROUND l,2and3areinput. 



5xi +2x2 +4.5x3 =68 
4xj +3.6x2 + 7x3 = 80.8 
9xi +7x2 +8x3 = 132 



Obtain x, , x, and x^ 
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Chapters Program Library 

Step Key operation 



Display 



Result of^. 
Result of /• 

Xj I' 

Result of, !. 



1 



10 



11 



12 



IMODEI m 



ISj [3] 



4.5 lEXEl 



68 



S.L.EQ-3 



ROUND 1 

A= ? 



B = 



C= ? 



D = 



ROUND 2 



A = 



Hereafter, input the values up to D of ROUND 3 by 
repeating steps 2 through 7. 



XI =7 



X2 = 3 



X3 = 6 



ROUND 1 ( Returns to step 2. 



Simultaneous linear equation with 4 unknowns can also be programmed 
within 544 steps. With reference to this program, try it! 
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Funithn List 



. Function 

Name 


Use Example 


Function 


Argument Range 

(JEG !r|--,144i_i 


SiN 


SiNa 


Sine function of x 


COS 


COS X 


Cosine function of x 


-RAD:!x|< 8 ,T 


TAN 


TAN X 


Tangent function of x 


JgRA:|x!<1600 


ASN 


ASNx 


Arcsine function of x 


1 1 K, 


ACS 


ACS X 


Arccosine function of x 


[ jx! i. 1 


ATN 


ATNx 


Arctangent function of x 


Entire range 


LOG 


LOG X 


Common logarithm of x 


X > 


LN 


LN X 


Natural logarithm of x 


X > 


EXP 


EXP 1 


Function to call out the numerical 




value of the exponential table. 




SQR 


SORx 


Square root of x 


xSO 


iNT 


iNTx 


Maximum integer which does not 
exceed x 


Entire range 


FRAC 


FRACx 


Decimal portion of x 


Entire range 


ABS 


ABSx 


Absolute value of x 


Entire range 


SGN 


SGN X 


Sign of X /x<0-*-l, x=0-*0\ 
\x>0^1 


Entire range 


RAN# 


RAN# 


Random number greater than but 
less than 1 




RND 


RND(x, t/) 


Value of X rounded off at the 10'>'' 
position, provided that y' is a value 


X : Entire range 






where y is rounded off below the 


y ■ - 100<:i/<100 






decimal point 




LEN 


LEN(A$) 


Uses a numerical- value to determine 


Simple character 






the length of the character string 


variable (A$~Z$) 






which is stored in the character 


and $ memory 






variable or $ memory 




VAL 


VAL(A$ ) 


Converts the character string which is 
stored in the character variable or $ 
memory into a numerical value 

(Example)^5^.j23"„.„^^L(A $ ) = 123 


" 


MiD 


MiD(x) 


Extracts y characters from the char- 


1 Ss X , 1/ < 3 1 




MiD(x, y) 


acter string stored in the $ memory 




starting from the xth character 


X + 1/ -^ 1 S 30 ] 






position 








If y is omitted, extracts all of the 








characters starting from the xth 








position 


1 


KEY 


KEY 


The key which is pressed during 
program execution is read in as a 








character 





m^^ 




RADIO SHACK, A DIVISION OF TANDY CORPORATION 

U.S.A.: FORT WORTH. TEXAS 76102 
CANADA; BARRIE, ONTARIO. L4M4WS 



TANDY CORPORATION 

AUSTRALIA BELGIUM UK 



i?Sr,?l^ ViCTOHIA ROAD PAFIC INDUSTRIEL DE NANINNE BILSTO ROAD WE0NES6UHY 
RVOALMERE NSW 2116 SIMNANimE WEST MIDLANDS WS1 7JN 

12A2A @ Printed in Japan 



